/*

  Copyright (C) 2000, 2001 Silicon Graphics, Inc.  All Rights Reserved.

  This program is free software; you can redistribute it and/or modify it
  under the terms of version 2 of the GNU General Public License as
  published by the Free Software Foundation.

  This program is distributed in the hope that it would be useful, but
  WITHOUT ANY WARRANTY; without even the implied warranty of
  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  

  Further, this software is distributed without any warranty that it is
  free of the rightful claim of any third person regarding infringement 
  or the like.  Any license provided herein, whether implied or 
  otherwise, applies only to this software file.  Patent licenses, if 
  any, provided herein do not apply to combinations of this program with 
  other software, or any other product whatsoever.  

  You should have received a copy of the GNU General Public License along
  with this program; if not, write the Free Software Foundation, Inc., 59
  Temple Place - Suite 330, Boston MA 02111-1307, USA.

  Contact information:  Silicon Graphics, Inc., 1600 Amphitheatre Pky,
  Mountain View, CA 94043, or:

  http://www.sgi.com

  For further information regarding this notice, see:

  http://oss.sgi.com/projects/GenInfo/NoticeExplan

*/



/* USMID:  "\n@(#)5.0_pl/headers/s_asg_expr.h	5.3	05/25/99 17:45:47\n" */


extern boolean  resolve_ext_opr(opnd_type *, boolean, boolean, boolean,
                                boolean *,
                                expr_arg_type *,
                                expr_arg_type *);

extern int      opr_to_str(operator_type, char *);

exp_tbl_type	bin_add_tbl[Num_Linear_Types][Num_Linear_Types] = {
/* Err_Res */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
	/* Typeless_1 */	{FALSE, Err_Res    },
	/* Typeless_2 */	{FALSE, Err_Res    },
	/* Typeless_4 */	{FALSE, Err_Res    },
	/* Typeless_8 */	{FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
	/* CRI_Parcel_Ptr_8  */	{FALSE, Err_Res    }
			},
/* Short_Char_Const */	{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Short_Typeless_Const },
	/* Short_Typeless_Const */	{TRUE , Short_Typeless_Const },
	/* Typeless_1 */	{TRUE , Typeless_1 },
	/* Typeless_2 */	{TRUE , Typeless_2 },
	/* Typeless_4 */	{TRUE , Typeless_4 },
	/* Typeless_8 */	{TRUE , Typeless_8 },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{TRUE , Integer_1  },
	/* Integer_2      */	{TRUE , Integer_2  },
	/* Integer_4      */	{TRUE , Integer_4  },
	/* Integer_8      */	{TRUE , Integer_8      },
	/* Real_4     */	{TRUE , Real_4     },
	/* Real_8     */	{TRUE , Real_8     },
	/* Real_16    */	{TRUE , Real_16    },
	/* Complex_4     */	{TRUE , Complex_4  },
	/* Complex_8     */	{TRUE , Complex_8  },
	/* Complex_16    */	{TRUE , Complex_16 },
	/* CRI_Ptr_8      */	{TRUE , CRI_Ptr_8   },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
	/* CRI_Parcel_Ptr_8  */	{TRUE , INT_WORD   }
			},
/* Short_Typeless_Const */	{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Short_Typeless_Const },
	/* Short_Typeless_Const */	{TRUE , Short_Typeless_Const },
	/* Typeless_1 */	{TRUE , Typeless_1 },
	/* Typeless_2 */	{TRUE , Typeless_2 },
	/* Typeless_4 */	{TRUE , Typeless_4 },
	/* Typeless_8 */	{TRUE , Typeless_8 },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{TRUE , Integer_1  },
	/* Integer_2      */	{TRUE , Integer_2  },
	/* Integer_4      */	{TRUE , Integer_4  },
	/* Integer_8      */	{TRUE , Integer_8  },
	/* Real_4     */	{TRUE , Real_4     },
        /* Real_8     */        {TRUE , Real_8     },
	/* Real_16    */	{TRUE , Real_16    },
	/* Complex_4     */	{TRUE , Complex_4  },
	/* Complex_8     */	{TRUE , Complex_8  },
	/* Complex_16    */	{TRUE , Complex_16 },
	/* CRI_Ptr_8      */	{TRUE , CRI_Ptr_8   },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
	/* CRI_Parcel_Ptr_8  */	{TRUE , INT_WORD   }
			},
/* Typeless_1 */        {
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {TRUE , Typeless_1 },
        /* Short_Typeless_Const */      {TRUE , Typeless_1 },
        /* Typeless_1 */        {TRUE , Typeless_1 },
        /* Typeless_2 */        {TRUE , Typeless_2 },
        /* Typeless_4 */        {TRUE , Typeless_4 },
        /* Typeless_8 */        {TRUE , Typeless_8 },
        /* Long_Typeless */     {FALSE, Err_Res    },
        /* Integer_1      */    {TRUE , Integer_1  },
        /* Integer_2      */    {TRUE , Integer_2  },
        /* Integer_4      */    {TRUE , Integer_4  },
        /* Integer_8      */    {TRUE , Integer_8  },
        /* Real_4     */        {FALSE, Err_Res    },
        /* Real_8     */        {FALSE, Err_Res    },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
        /* CRI_Ptr_8      */    {TRUE , CRI_Ptr_8   },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */       {FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */ {TRUE , INT_WORD   }
                        },
/* Typeless_2 */        {
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {TRUE , Typeless_2 },
        /* Short_Typeless_Const */      {TRUE , Typeless_2 },
        /* Typeless_1 */        {TRUE , Typeless_2 },
        /* Typeless_2 */        {TRUE , Typeless_2 },
        /* Typeless_4 */        {TRUE , Typeless_4 },
        /* Typeless_8 */        {TRUE , Typeless_8 },
        /* Long_Typeless */     {FALSE, Err_Res    },
        /* Integer_1      */    {TRUE , Integer_1  },
        /* Integer_2      */    {TRUE , Integer_2  },
        /* Integer_4      */    {TRUE , Integer_4  },
        /* Integer_8      */    {TRUE , Integer_8  },
        /* Real_4     */        {FALSE, Err_Res    },
        /* Real_8     */        {FALSE, Err_Res    },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
        /* CRI_Ptr_8      */    {TRUE , CRI_Ptr_8   },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */       {FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */ {TRUE , INT_WORD   }
                        },
/* Typeless_4 */	{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Typeless_4 },
	/* Short_Typeless_Const */	{TRUE , Typeless_4 },
	/* Typeless_1 */	{TRUE , Typeless_4 },
	/* Typeless_2 */	{TRUE , Typeless_4 },
	/* Typeless_4 */	{TRUE , Typeless_4 },
	/* Typeless_8 */	{TRUE , Typeless_8 },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{TRUE , Integer_1  },
	/* Integer_2      */	{TRUE , Integer_2  },
	/* Integer_4      */	{TRUE , Integer_4  },
	/* Integer_8      */	{TRUE , Integer_8  },
	/* Real_4     */	{TRUE , Real_4     },
        /* Real_8     */        {FALSE, Err_Res    },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{TRUE , CRI_Ptr_8   },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
	/* CRI_Parcel_Ptr_8  */	{TRUE , INT_WORD   }
			},
/* Typeless_8 */	{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Typeless_8 },
	/* Short_Typeless_Const */	{TRUE , Typeless_8 },
	/* Typeless_1 */	{TRUE , Typeless_8 },
	/* Typeless_2 */	{TRUE , Typeless_8 },
	/* Typeless_4 */	{TRUE , Typeless_8 },
	/* Typeless_8 */	{TRUE , Typeless_8 },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{TRUE , Integer_1  },
	/* Integer_2      */	{TRUE , Integer_2  },
	/* Integer_4      */	{TRUE , Integer_4  },
	/* Integer_8      */	{TRUE , Integer_8  },
	/* Real_4     */	{TRUE , Real_4     },
        /* Real_8     */        {TRUE , Real_8     },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{TRUE , CRI_Ptr_8   },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
	/* CRI_Parcel_Ptr_8  */	{TRUE , INT_WORD   }
			},
/* Long_Typeless */	{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
	/* Typeless_1 */	{FALSE, Err_Res    },
	/* Typeless_2 */	{FALSE, Err_Res    },
	/* Typeless_4 */	{FALSE, Err_Res    },
	/* Typeless_8 */	{FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
	/* CRI_Parcel_Ptr_8  */	{FALSE, Err_Res    }
			},
/* Integer_1 */         {
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {TRUE , Integer_1  },
        /* Short_Typeless_Const */        {TRUE , Integer_1  },
        /* Typeless_1 */        {TRUE , Integer_1  },
        /* Typeless_2 */        {TRUE , Integer_1  },
        /* Typeless_4 */        {TRUE , Integer_1  },
        /* Typeless_8 */        {TRUE , Integer_1  },
        /* Long_Typeless */        {FALSE, Err_Res    },
        /* Integer_1      */    {FALSE, Integer_1      },
        /* Integer_2      */    {FALSE, Integer_2      },
        /* Integer_4      */    {FALSE, Integer_4      },
        /* Integer_8      */    {FALSE, Integer_8      },
        /* Real_4     */        {FALSE, Real_4     },
        /* Real_8     */        {FALSE, Real_8     },
        /* Real_16    */        {FALSE, Real_16    },
        /* Complex_4     */     {FALSE, Complex_4     },
        /* Complex_8     */     {FALSE, Complex_8     },
        /* Complex_16    */     {FALSE, Complex_16    },
        /* CRI_Ptr_8      */    {TRUE , CRI_Ptr_8   },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {TRUE , CRI_Ch_Ptr_8    },
        /* Structure_Type      */        {FALSE, Err_Res    },
	/* CRI_Parcel_Ptr_8  */	{TRUE , INT_WORD   }
                        },
/* Integer_2 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Integer_2  },
	/* Short_Typeless_Const */	{TRUE , Integer_2  },
	/* Typeless_1 */	{TRUE , Integer_2  },
	/* Typeless_2 */	{TRUE , Integer_2  },
	/* Typeless_4 */	{TRUE , Integer_2  },
	/* Typeless_8 */	{TRUE , Integer_2  },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Integer_2      },
	/* Integer_2      */	{FALSE, Integer_2      },
	/* Integer_4      */	{FALSE, Integer_4      },
	/* Integer_8      */	{FALSE, Integer_8      },
	/* Real_4     */	{FALSE, Real_4     },
	/* Real_8     */	{FALSE, Real_8     },
	/* Real_16    */	{FALSE, Real_16    },
	/* Complex_4     */	{FALSE, Complex_4     },
	/* Complex_8     */	{FALSE, Complex_8     },
	/* Complex_16    */	{FALSE, Complex_16    },
	/* CRI_Ptr_8      */	{TRUE , CRI_Ptr_8   },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{TRUE , CRI_Ch_Ptr_8    },
	/* Structure_Type      */	{FALSE, Err_Res    },
	/* CRI_Parcel_Ptr_8  */	{TRUE , INT_WORD   }
			},
/* Integer_4 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Integer_4  },
	/* Short_Typeless_Const */	{TRUE , Integer_4  },
	/* Typeless_1 */	{TRUE , Integer_4  },
	/* Typeless_2 */	{TRUE , Integer_4  },
	/* Typeless_4 */	{TRUE , Integer_4  },
	/* Typeless_8 */	{TRUE , Integer_4  },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Integer_4      },
	/* Integer_2      */	{FALSE, Integer_4      },
	/* Integer_4      */	{FALSE, Integer_4      },
	/* Integer_8      */	{FALSE, Integer_8      },
	/* Real_4     */	{FALSE, Real_4     },
	/* Real_8     */	{FALSE, Real_8     },
	/* Real_16    */	{FALSE, Real_16    },
	/* Complex_4     */	{FALSE, Complex_4     },
	/* Complex_8     */	{FALSE, Complex_8     },
	/* Complex_16    */	{FALSE, Complex_16    },
	/* CRI_Ptr_8      */	{TRUE , CRI_Ptr_8   },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{TRUE , CRI_Ch_Ptr_8    },
	/* Structure_Type      */	{FALSE, Err_Res    },
	/* CRI_Parcel_Ptr_8  */	{TRUE , INT_WORD   }
			},
/* Integer_8 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Integer_8      },
	/* Short_Typeless_Const */	{TRUE , Integer_8      },
	/* Typeless_1 */	{TRUE , Integer_8      },
	/* Typeless_2 */	{TRUE , Integer_8      },
	/* Typeless_4 */	{TRUE , Integer_8      },
	/* Typeless_8 */	{TRUE , Integer_8      },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Integer_8      },
	/* Integer_2      */	{FALSE, Integer_8      },
	/* Integer_4      */	{FALSE, Integer_8      },
	/* Integer_8      */	{FALSE, Integer_8      },
	/* Real_4     */	{FALSE, Real_4     },
	/* Real_8     */	{FALSE, Real_8     },
	/* Real_16    */	{FALSE, Real_16    },
	/* Complex_4     */	{FALSE, Complex_4     },
	/* Complex_8     */	{FALSE, Complex_8     },
	/* Complex_16    */	{FALSE, Complex_16    },
	/* CRI_Ptr_8      */	{TRUE , CRI_Ptr_8   },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{TRUE , CRI_Ch_Ptr_8    },
	/* Structure_Type      */	{FALSE, Err_Res    },
	/* CRI_Parcel_Ptr_8  */	{TRUE , INT_WORD   }
			},
/* Real_4 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Real_4     },
	/* Short_Typeless_Const */	{TRUE , Real_4     },
	/* Typeless_1 */	{FALSE, Err_Res    },
	/* Typeless_2 */	{FALSE, Err_Res    },
	/* Typeless_4 */	{TRUE , Real_4     },
	/* Typeless_8 */	{TRUE , Real_4     },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Real_4     },
	/* Integer_2      */	{FALSE, Real_4     },
	/* Integer_4      */	{FALSE, Real_4     },
	/* Integer_8      */	{FALSE, Real_4     },
	/* Real_4     */	{FALSE, Real_4     },
	/* Real_8     */	{FALSE, Real_8     },
	/* Real_16    */	{FALSE, Real_16    },
	/* Complex_4     */	{FALSE, Complex_4     },
	/* Complex_8     */	{FALSE, Complex_8     },
	/* Complex_16    */	{FALSE, Complex_16    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
	/* CRI_Parcel_Ptr_8  */	{FALSE, Err_Res    }
			},
/* Real_8 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Real_8     },
	/* Short_Typeless_Const */	{TRUE , Real_8     },
        /* Typeless_1 */    {FALSE, Err_Res    },
        /* Typeless_2 */    {FALSE, Err_Res    },
        /* Typeless_4 */    {FALSE, Err_Res    },
        /* Typeless_8 */    {TRUE , Real_8     },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Real_8     },
	/* Integer_2      */	{FALSE, Real_8     },
	/* Integer_4      */	{FALSE, Real_8     },
	/* Integer_8      */	{FALSE, Real_8     },
	/* Real_4     */	{FALSE, Real_8     },
	/* Real_8     */	{FALSE, Real_8     },
	/* Real_16    */	{FALSE, Real_16    },
	/* Complex_4     */	{FALSE, Complex_8     },
	/* Complex_8     */	{FALSE, Complex_8     },
	/* Complex_16    */	{FALSE, Complex_16    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
	/* CRI_Parcel_Ptr_8  */	{FALSE, Err_Res    }
			},
/* Real_16 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Real_16    },
	/* Short_Typeless_Const */	{TRUE , Real_16    },
	/* Typeless_1 */	{FALSE, Err_Res    },
	/* Typeless_2 */	{FALSE, Err_Res    },
	/* Typeless_4 */	{FALSE, Err_Res    },
	/* Typeless_8 */	{FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Real_16    },
	/* Integer_2      */	{FALSE, Real_16    },
	/* Integer_4      */	{FALSE, Real_16    },
	/* Integer_8      */	{FALSE, Real_16    },
	/* Real_4     */	{FALSE, Real_16    },
	/* Real_8     */	{FALSE, Real_16    },
	/* Real_16    */	{FALSE, Real_16    },
	/* Complex_4     */	{FALSE, Complex_16    },
	/* Complex_8     */	{FALSE, Complex_16    },
	/* Complex_16    */	{FALSE, Complex_16    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
	/* CRI_Parcel_Ptr_8  */	{FALSE, Err_Res    }
			},
/* Complex_4 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Complex_4  },
	/* Short_Typeless_Const */	{TRUE , Complex_4  },
	/* Typeless_1 */	{FALSE, Err_Res    },
	/* Typeless_2 */	{FALSE, Err_Res    },
	/* Typeless_4 */	{FALSE, Err_Res    },
	/* Typeless_8 */	{FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Complex_4     },
	/* Integer_2      */	{FALSE, Complex_4     },
	/* Integer_4      */	{FALSE, Complex_4     },
	/* Integer_8      */	{FALSE, Complex_4     },
	/* Real_4     */	{FALSE, Complex_4     },
	/* Real_8     */	{FALSE, Complex_8     },
	/* Real_16    */	{FALSE, Complex_16    },
	/* Complex_4     */	{FALSE, Complex_4     },
	/* Complex_8     */	{FALSE, Complex_8     },
	/* Complex_16    */	{FALSE, Complex_16    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
	/* CRI_Parcel_Ptr_8  */	{FALSE, Err_Res    }
			},
/* Complex_8 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Complex_8  },
	/* Short_Typeless_Const */	{TRUE , Complex_8  },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Complex_8     },
	/* Integer_2      */	{FALSE, Complex_8     },
	/* Integer_4      */	{FALSE, Complex_8     },
	/* Integer_8      */	{FALSE, Complex_8     },
	/* Real_4     */	{FALSE, Complex_8     },
	/* Real_8     */	{FALSE, Complex_8     },
	/* Real_16    */	{FALSE, Complex_16    },
	/* Complex_4     */	{FALSE, Complex_8     },
	/* Complex_8     */	{FALSE, Complex_8     },
	/* Complex_16    */	{FALSE, Complex_16    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
	/* CRI_Parcel_Ptr_8  */	{FALSE, Err_Res    }
			},
/* Complex_16 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Complex_16 },
	/* Short_Typeless_Const */	{TRUE , Complex_16 },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Complex_16    },
	/* Integer_2      */	{FALSE, Complex_16    },
	/* Integer_4      */	{FALSE, Complex_16    },
	/* Integer_8      */	{FALSE, Complex_16    },
	/* Real_4     */	{FALSE, Complex_16    },
	/* Real_8     */	{FALSE, Complex_16    },
	/* Real_16    */	{FALSE, Complex_16    },
	/* Complex_4     */	{FALSE, Complex_16    },
	/* Complex_8     */	{FALSE, Complex_16    },
	/* Complex_16    */	{FALSE, Complex_16    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
	/* CRI_Parcel_Ptr_8  */	{FALSE, Err_Res    }
			},
/* CRI_Ptr_8 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , CRI_Ptr_8   },
	/* Short_Typeless_Const */	{TRUE , CRI_Ptr_8   },
	/* Typeless_1 */	{TRUE , CRI_Ptr_8   },
	/* Typeless_2 */	{TRUE , CRI_Ptr_8   },
	/* Typeless_4 */	{TRUE , CRI_Ptr_8   },
	/* Typeless_8 */	{TRUE , CRI_Ptr_8   },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{TRUE , CRI_Ptr_8   },
	/* Integer_2      */	{TRUE , CRI_Ptr_8   },
	/* Integer_4      */	{TRUE , CRI_Ptr_8   },
	/* Integer_8      */	{TRUE , CRI_Ptr_8   },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{TRUE , INT_WORD   },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
	/* CRI_Parcel_Ptr_8  */	{TRUE , CRI_Ptr_8   }
			},
/* Logical_1 */		{
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {FALSE, Err_Res    },
        /* Short_Typeless_Const */        {FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
        /* Long_Typeless */        {FALSE, Err_Res    },
        /* Integer_1      */    {FALSE, Err_Res    },
        /* Integer_2      */    {FALSE, Err_Res    },
        /* Integer_4      */    {FALSE, Err_Res    },
        /* Integer_8      */    {FALSE, Err_Res    },
        /* Real_4     */        {FALSE, Err_Res    },
        /* Real_8     */        {FALSE, Err_Res    },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
        /* CRI_Ptr_8      */    {FALSE, Err_Res    },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */        {FALSE, Err_Res    },
	/* CRI_Parcel_Ptr_8  */	{FALSE, Err_Res    }
                        },
/* Logical_2 */		{
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {FALSE, Err_Res    },
        /* Short_Typeless_Const */        {FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
        /* Long_Typeless */     {FALSE, Err_Res    },
        /* Integer_1      */    {FALSE, Err_Res    },
        /* Integer_2      */    {FALSE, Err_Res    },
        /* Integer_4      */    {FALSE, Err_Res    },
        /* Integer_8      */    {FALSE, Err_Res    },
        /* Real_4     */        {FALSE, Err_Res    },
        /* Real_8     */        {FALSE, Err_Res    },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
        /* CRI_Ptr_8      */    {FALSE, Err_Res    },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */        {FALSE, Err_Res    },
	/* CRI_Parcel_Ptr_8  */	{FALSE, Err_Res    }
                        },
/* Logical_4 */		{
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {FALSE, Err_Res    },
        /* Short_Typeless_Const */        {FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
        /* Long_Typeless */        {FALSE, Err_Res    },
        /* Integer_1      */    {FALSE, Err_Res    },
        /* Integer_2      */    {FALSE, Err_Res    },
        /* Integer_4      */    {FALSE, Err_Res    },
        /* Integer_8      */    {FALSE, Err_Res    },
        /* Real_4     */        {FALSE, Err_Res    },
        /* Real_8     */        {FALSE, Err_Res    },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
        /* CRI_Ptr_8      */    {FALSE, Err_Res    },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */        {FALSE, Err_Res    },
	/* CRI_Parcel_Ptr_8  */	{FALSE, Err_Res    }
                        },
/* Logical_8 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
	/* CRI_Parcel_Ptr_8  */	{FALSE, Err_Res    }
			},
/* Character_1 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
	/* CRI_Parcel_Ptr_8  */	{FALSE, Err_Res    }
			},
/* Character_2 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
	/* CRI_Parcel_Ptr_8  */	{FALSE, Err_Res    }
			},
/* Character_4 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
	/* CRI_Parcel_Ptr_8  */	{FALSE, Err_Res    }
			},
/* CRI_Ch_Ptr_8 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{TRUE , CRI_Ch_Ptr_8    },
	/* Integer_2      */	{TRUE , CRI_Ch_Ptr_8    },
	/* Integer_4      */	{TRUE , CRI_Ch_Ptr_8    },
	/* Integer_8      */	{TRUE , CRI_Ch_Ptr_8    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
	/* CRI_Parcel_Ptr_8  */	{FALSE, Err_Res    }
			},
/* Structure_Type   */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
	/* CRI_Parcel_Ptr_8  */	{FALSE, Err_Res    }
			},
/* CRI_Parcel_Ptr_8   */          {
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {TRUE , INT_WORD   },
        /* Short_Typeless_Const */    {TRUE , INT_WORD   },
        /* Typeless_1 */    {TRUE , INT_WORD   },
        /* Typeless_2 */    {TRUE , INT_WORD   },
        /* Typeless_4 */    {TRUE , INT_WORD   },
        /* Typeless_8 */    {TRUE , INT_WORD   },
        /* Long_Typeless */     {FALSE, Err_Res    },
        /* Integer_1      */    {TRUE , INT_WORD   },
        /* Integer_2      */    {TRUE , INT_WORD   },
        /* Integer_4      */    {TRUE , INT_WORD   },
        /* Integer_8      */    {TRUE , INT_WORD   },
        /* Real_4     */        {FALSE, Err_Res    },
        /* Real_8     */        {FALSE, Err_Res    },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
        /* CRI_Ptr_8      */    {TRUE , CRI_Ptr_8   },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */       {FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */ {TRUE , INT_WORD   }
                        }
		};


exp_tbl_type	bin_sub_tbl[Num_Linear_Types][Num_Linear_Types] = {
/* Err_Res */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Short_Char_Const */	{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Short_Typeless_Const },
	/* Short_Typeless_Const */	{TRUE , Short_Typeless_Const },
	/* Typeless_1 */	{TRUE , Typeless_1 },
	/* Typeless_2 */	{TRUE , Typeless_2 },
	/* Typeless_4 */	{TRUE , Typeless_4 },
	/* Typeless_8 */	{TRUE , Typeless_8 },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{TRUE , Integer_1  },
	/* Integer_2      */	{TRUE , Integer_2  },
	/* Integer_4      */	{TRUE , Integer_4  },
	/* Integer_8      */	{TRUE , Integer_8  },
	/* Real_4     */	{TRUE , Real_4     },
	/* Real_8     */	{TRUE , Real_8     },
	/* Real_16    */	{TRUE , Real_16    },
	/* Complex_4     */	{TRUE , Complex_4  },
	/* Complex_8     */	{TRUE , Complex_8  },
	/* Complex_16    */	{TRUE , Complex_16 },
	/* CRI_Ptr_8      */	{TRUE , CRI_Ptr_8   },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , INT_WORD   }
			},
/* Short_Typeless_Const */	{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Short_Typeless_Const },
	/* Short_Typeless_Const */	{TRUE , Short_Typeless_Const },
	/* Typeless_1 */	{TRUE , Typeless_1 },
	/* Typeless_2 */	{TRUE , Typeless_2 },
	/* Typeless_4 */	{TRUE , Typeless_4 },
	/* Typeless_8 */	{TRUE , Typeless_8 },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{TRUE , Integer_1  },
	/* Integer_2      */	{TRUE , Integer_2  },
	/* Integer_4      */	{TRUE , Integer_4  },
	/* Integer_8      */	{TRUE , Integer_8      },
	/* Real_4     */	{TRUE , Real_4     },
        /* Real_8     */        {TRUE , Real_8     },
	/* Real_16    */	{TRUE , Real_16    },
	/* Complex_4     */	{TRUE , Complex_4  },
	/* Complex_8     */	{TRUE , Complex_8  },
	/* Complex_16    */	{TRUE , Complex_16 },
	/* CRI_Ptr_8      */	{TRUE , CRI_Ptr_8   },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , INT_WORD   }
			},
/* Typeless_1 */        {
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {TRUE , Typeless_1 },
        /* Short_Typeless_Const */      {TRUE , Typeless_1 },
        /* Typeless_1 */        {TRUE , Typeless_1 },
        /* Typeless_2 */        {TRUE , Typeless_2 },
        /* Typeless_4 */        {TRUE , Typeless_4 },
        /* Typeless_8 */        {TRUE , Typeless_8 },
        /* Long_Typeless */     {FALSE, Err_Res    },
        /* Integer_1      */    {TRUE , Integer_1  },
        /* Integer_2      */    {TRUE , Integer_2  },
        /* Integer_4      */    {TRUE , Integer_4  },
        /* Integer_8      */    {TRUE , Integer_8      },
        /* Real_4     */        {FALSE, Err_Res    },
        /* Real_8     */        {FALSE, Err_Res    },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
        /* CRI_Ptr_8      */    {TRUE , CRI_Ptr_8   },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */       {FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , INT_WORD   }
                        },
/* Typeless_2 */        {
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {TRUE , Typeless_2 },
        /* Short_Typeless_Const */      {TRUE , Typeless_2 },
        /* Typeless_1 */        {TRUE , Typeless_2 },
        /* Typeless_2 */        {TRUE , Typeless_2 },
        /* Typeless_4 */        {TRUE , Typeless_4 },
        /* Typeless_8 */        {TRUE , Typeless_8 },
        /* Long_Typeless */     {FALSE, Err_Res    },
        /* Integer_1      */    {TRUE , Integer_1  },
        /* Integer_2      */    {TRUE , Integer_2  },
        /* Integer_4      */    {TRUE , Integer_4  },
        /* Integer_8      */    {TRUE , Integer_8      },
        /* Real_4     */        {FALSE, Err_Res    },
        /* Real_8     */        {FALSE, Err_Res    },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
        /* CRI_Ptr_8      */    {TRUE , CRI_Ptr_8   },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */       {FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , INT_WORD   }
                        },
/* Typeless_4 */	{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Typeless_4 },
	/* Short_Typeless_Const */	{TRUE , Typeless_4 },
	/* Typeless_1 */	{TRUE , Typeless_4 },
	/* Typeless_2 */	{TRUE , Typeless_4 },
	/* Typeless_4 */	{TRUE , Typeless_4 },
	/* Typeless_8 */	{TRUE , Typeless_8 },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{TRUE , Integer_1  },
	/* Integer_2      */	{TRUE , Integer_2  },
	/* Integer_4      */	{TRUE , Integer_4  },
	/* Integer_8      */	{TRUE , Integer_8      },
	/* Real_4     */	{TRUE , Real_4     },
        /* Real_8     */        {FALSE, Err_Res    },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{TRUE , CRI_Ptr_8   },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , INT_WORD   }
			},
/* Typeless_8 */	{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Typeless_8 },
	/* Short_Typeless_Const */	{TRUE , Typeless_8 },
	/* Typeless_1 */	{TRUE , Typeless_8 },
	/* Typeless_2 */	{TRUE , Typeless_8 },
	/* Typeless_4 */	{TRUE , Typeless_8 },
	/* Typeless_8 */	{TRUE , Typeless_8 },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{TRUE , Integer_1  },
	/* Integer_2      */	{TRUE , Integer_2  },
	/* Integer_4      */	{TRUE , Integer_4  },
	/* Integer_8      */	{TRUE , Integer_8      },
	/* Real_4     */	{TRUE , Real_4     },
        /* Real_8     */        {TRUE , Real_8     },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{TRUE , CRI_Ptr_8   },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , INT_WORD   }
			},
/* Long_Typeless */	{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Integer_1 */         {
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {TRUE , Integer_1  },
        /* Short_Typeless_Const */        {TRUE , Integer_1  },
        /* Typeless_1 */        {TRUE , Integer_1  },
        /* Typeless_2 */        {TRUE , Integer_1  },
        /* Typeless_4 */        {TRUE , Integer_1  },
        /* Typeless_8 */        {TRUE , Integer_1  },
        /* Long_Typeless */        {FALSE, Err_Res    },
        /* Integer_1      */    {FALSE, Integer_1      },
        /* Integer_2      */    {FALSE, Integer_2      },
        /* Integer_4      */    {FALSE, Integer_4      },
        /* Integer_8      */    {FALSE, Integer_8      },
        /* Real_4     */        {FALSE, Real_4     },
        /* Real_8     */        {FALSE, Real_8     },
        /* Real_16    */        {FALSE, Real_16    },
        /* Complex_4     */     {FALSE, Complex_4     },
        /* Complex_8     */     {FALSE, Complex_8     },
        /* Complex_16    */     {FALSE, Complex_16    },
        /* CRI_Ptr_8      */    {TRUE , CRI_Ptr_8   },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */        {FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , INT_WORD   }
                        },
/* Integer_2 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Integer_2  },
	/* Short_Typeless_Const */	{TRUE , Integer_2  },
	/* Typeless_1 */	{TRUE , Integer_2  },
	/* Typeless_2 */	{TRUE , Integer_2  },
	/* Typeless_4 */	{TRUE , Integer_2  },
	/* Typeless_8 */	{TRUE , Integer_2  },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Integer_2      },
	/* Integer_2      */	{FALSE, Integer_2      },
	/* Integer_4      */	{FALSE, Integer_4      },
	/* Integer_8      */	{FALSE, Integer_8      },
	/* Real_4     */	{FALSE, Real_4     },
	/* Real_8     */	{FALSE, Real_8     },
	/* Real_16    */	{FALSE, Real_16    },
	/* Complex_4     */	{FALSE, Complex_4     },
	/* Complex_8     */	{FALSE, Complex_8     },
	/* Complex_16    */	{FALSE, Complex_16    },
	/* CRI_Ptr_8      */	{TRUE , CRI_Ptr_8   },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , INT_WORD   }
			},
/* Integer_4 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Integer_4  },
	/* Short_Typeless_Const */	{TRUE , Integer_4  },
	/* Typeless_1 */	{TRUE , Integer_4  },
	/* Typeless_2 */	{TRUE , Integer_4  },
	/* Typeless_4 */	{TRUE , Integer_4  },
	/* Typeless_8 */	{TRUE , Integer_4  },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Integer_4      },
	/* Integer_2      */	{FALSE, Integer_4      },
	/* Integer_4      */	{FALSE, Integer_4      },
	/* Integer_8      */	{FALSE, Integer_8      },
	/* Real_4     */	{FALSE, Real_4     },
	/* Real_8     */	{FALSE, Real_8     },
	/* Real_16    */	{FALSE, Real_16    },
	/* Complex_4     */	{FALSE, Complex_4     },
	/* Complex_8     */	{FALSE, Complex_8     },
	/* Complex_16    */	{FALSE, Complex_16    },
	/* CRI_Ptr_8      */	{TRUE , CRI_Ptr_8   },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , INT_WORD   }
			},
/* Integer_8 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Integer_8      },
	/* Short_Typeless_Const */	{TRUE , Integer_8      },
	/* Typeless_1 */	{TRUE , Integer_8      },
	/* Typeless_2 */	{TRUE , Integer_8      },
	/* Typeless_4 */	{TRUE , Integer_8      },
	/* Typeless_8 */	{TRUE , Integer_8      },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Integer_8      },
	/* Integer_2      */	{FALSE, Integer_8      },
	/* Integer_4      */	{FALSE, Integer_8      },
	/* Integer_8      */	{FALSE, Integer_8      },
	/* Real_4     */	{FALSE, Real_4     },
	/* Real_8     */	{FALSE, Real_8     },
	/* Real_16    */	{FALSE, Real_16    },
	/* Complex_4     */	{FALSE, Complex_4     },
	/* Complex_8     */	{FALSE, Complex_8     },
	/* Complex_16    */	{FALSE, Complex_16    },
	/* CRI_Ptr_8      */	{TRUE , CRI_Ptr_8   },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , INT_WORD   }
			},
/* Real_4 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Real_4     },
	/* Short_Typeless_Const */	{TRUE , Real_4     },
	/* Typeless_1 */	{TRUE , Err_Res    },
	/* Typeless_2 */	{TRUE , Err_Res    },    
	/* Typeless_4 */	{TRUE , Real_4     },
	/* Typeless_8 */	{TRUE , Real_4     },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Real_4     },
	/* Integer_2      */	{FALSE, Real_4     },
	/* Integer_4      */	{FALSE, Real_4     },
	/* Integer_8      */	{FALSE, Real_4     },
	/* Real_4     */	{FALSE, Real_4     },
	/* Real_8     */	{FALSE, Real_8     },
	/* Real_16    */	{FALSE, Real_16    },
	/* Complex_4     */	{FALSE, Complex_4     },
	/* Complex_8     */	{FALSE, Complex_8     },
	/* Complex_16    */	{FALSE, Complex_16    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Real_8 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Real_8     },
	/* Short_Typeless_Const */	{TRUE , Real_8     },
        /* Typeless_1 */    {FALSE, Err_Res    },
        /* Typeless_2 */    {FALSE, Err_Res    },
        /* Typeless_4 */    {FALSE, Err_Res    },
        /* Typeless_8 */    {TRUE , Real_8     },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Real_8     },
	/* Integer_2      */	{FALSE, Real_8     },
	/* Integer_4      */	{FALSE, Real_8     },
	/* Integer_8      */	{FALSE, Real_8     },
	/* Real_4     */	{FALSE, Real_8     },
	/* Real_8     */	{FALSE, Real_8     },
	/* Real_16    */	{FALSE, Real_16    },
	/* Complex_4     */	{FALSE, Complex_8     },
	/* Complex_8     */	{FALSE, Complex_8     },
	/* Complex_16    */	{FALSE, Complex_16    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Real_16 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Real_16    },
	/* Short_Typeless_Const */	{TRUE , Real_16    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Real_16    },
	/* Integer_2      */	{FALSE, Real_16    },
	/* Integer_4      */	{FALSE, Real_16    },
	/* Integer_8      */	{FALSE, Real_16    },
	/* Real_4     */	{FALSE, Real_16    },
	/* Real_8     */	{FALSE, Real_16    },
	/* Real_16    */	{FALSE, Real_16    },
	/* Complex_4     */	{FALSE, Complex_16    },
	/* Complex_8     */	{FALSE, Complex_16    },
	/* Complex_16    */	{FALSE, Complex_16    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Complex_4 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Complex_4  },
	/* Short_Typeless_Const */	{TRUE , Complex_4  },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Complex_4     },
	/* Integer_2      */	{FALSE, Complex_4     },
	/* Integer_4      */	{FALSE, Complex_4     },
	/* Integer_8      */	{FALSE, Complex_4     },
	/* Real_4     */	{FALSE, Complex_4     },
	/* Real_8     */	{FALSE, Complex_8     },
	/* Real_16    */	{FALSE, Complex_16    },
	/* Complex_4     */	{FALSE, Complex_4     },
	/* Complex_8     */	{FALSE, Complex_8     },
	/* Complex_16    */	{FALSE, Complex_16    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Complex_8 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Complex_8  },
	/* Short_Typeless_Const */	{TRUE , Complex_8  },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Complex_8     },
	/* Integer_2      */	{FALSE, Complex_8     },
	/* Integer_4      */	{FALSE, Complex_8     },
	/* Integer_8      */	{FALSE, Complex_8     },
	/* Real_4     */	{FALSE, Complex_8     },
	/* Real_8     */	{FALSE, Complex_8     },
	/* Real_16    */	{FALSE, Complex_16    },
	/* Complex_4     */	{FALSE, Complex_8     },
	/* Complex_8     */	{FALSE, Complex_8     },
	/* Complex_16    */	{FALSE, Complex_16    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Complex_16 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Complex_16 },
	/* Short_Typeless_Const */	{TRUE , Complex_16 },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Complex_16    },
	/* Integer_2      */	{FALSE, Complex_16    },
	/* Integer_4      */	{FALSE, Complex_16    },
	/* Integer_8      */	{FALSE, Complex_16    },
	/* Real_4     */	{FALSE, Complex_16    },
	/* Real_8     */	{FALSE, Complex_16    },
	/* Real_16    */	{FALSE, Complex_16    },
	/* Complex_4     */	{FALSE, Complex_16    },
	/* Complex_8     */	{FALSE, Complex_16    },
	/* Complex_16    */	{FALSE, Complex_16    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* CRI_Ptr_8 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , CRI_Ptr_8   },
	/* Short_Typeless_Const */	{TRUE , CRI_Ptr_8   },
	/* Typeless_1 */	{TRUE , CRI_Ptr_8   },
	/* Typeless_2 */	{TRUE , CRI_Ptr_8   },
	/* Typeless_4 */	{TRUE , CRI_Ptr_8   },
	/* Typeless_8 */	{TRUE , CRI_Ptr_8   },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{TRUE , CRI_Ptr_8   },
	/* Integer_2      */	{TRUE , CRI_Ptr_8   },
	/* Integer_4      */	{TRUE , CRI_Ptr_8   },
	/* Integer_8      */	{TRUE , CRI_Ptr_8   },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{TRUE , INT_WORD   },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , CRI_Ptr_8   }
			},
/* Logical_1 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Logical_2 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Logical_4 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Logical_8 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Character_1 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Character_2 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Character_4 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* CRI_Ch_Ptr_8 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{TRUE , CRI_Ch_Ptr_8    },
	/* Integer_2      */	{TRUE , CRI_Ch_Ptr_8    },
	/* Integer_4      */	{TRUE , CRI_Ch_Ptr_8    },
	/* Integer_8      */	{TRUE , CRI_Ch_Ptr_8    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Structure_Type   */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* CRI_Parcel_Ptr_8   */          {
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {TRUE , INT_WORD   },
        /* Short_Typeless_Const */    {TRUE , INT_WORD   },
        /* Typeless_1 */    {TRUE , INT_WORD   },
        /* Typeless_2 */    {TRUE , INT_WORD   },
        /* Typeless_4 */    {TRUE , INT_WORD   },
        /* Typeless_8 */    {TRUE , INT_WORD   },
        /* Long_Typeless */     {FALSE, Err_Res    },
        /* Integer_1      */    {TRUE , INT_WORD   },
        /* Integer_2      */    {TRUE , INT_WORD   },
        /* Integer_4      */    {TRUE , INT_WORD   },
        /* Integer_8      */    {TRUE , INT_WORD   },
        /* Real_4     */        {FALSE, Err_Res    },
        /* Real_8     */        {FALSE, Err_Res    },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
        /* CRI_Ptr_8      */    {TRUE , CRI_Ptr_8   },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */       {FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , INT_WORD   }
                        }
		};


exp_tbl_type	mult_div_tbl[Num_Linear_Types][Num_Linear_Types] = {
/* Err_Res */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Short_Char_Const */	{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Short_Typeless_Const },
	/* Short_Typeless_Const */	{TRUE , Short_Typeless_Const },
	/* Typeless_1 */	{TRUE , Typeless_1 },
	/* Typeless_2 */	{TRUE , Typeless_2 },
	/* Typeless_4 */	{TRUE , Typeless_4 },
	/* Typeless_8 */	{TRUE , Typeless_8 },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{TRUE , Integer_1  },
	/* Integer_2      */	{TRUE , Integer_2  },
	/* Integer_4      */	{TRUE , Integer_4  },
	/* Integer_8      */	{TRUE , Integer_8      },
	/* Real_4     */	{TRUE , Real_4     },
        /* Real_8     */        {TRUE , Real_8     },
        /* Real_16    */        {TRUE , Real_16    },
	/* Complex_4     */	{TRUE , Complex_4  },
	/* Complex_8     */	{TRUE , Complex_8  },
	/* Complex_16    */	{TRUE , Complex_16 },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Short_Typeless_Const */	{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Short_Typeless_Const },
	/* Short_Typeless_Const */	{TRUE , Short_Typeless_Const },
	/* Typeless_1 */	{TRUE , Typeless_1 },
	/* Typeless_2 */	{TRUE , Typeless_2 },
	/* Typeless_4 */	{TRUE , Typeless_4 },
	/* Typeless_8 */	{TRUE , Typeless_8 },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{TRUE , Integer_1  },
	/* Integer_2      */	{TRUE , Integer_2  },
	/* Integer_4      */	{TRUE , Integer_4  },
	/* Integer_8      */	{TRUE , Integer_8      },
	/* Real_4     */	{TRUE , Real_4     },
        /* Real_8     */        {TRUE , Real_8     },
        /* Real_16    */        {TRUE , Real_16    },
	/* Complex_4     */	{TRUE , Complex_4  },
	/* Complex_8     */	{TRUE , Complex_8  },
	/* Complex_16    */	{TRUE , Complex_16 },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Typeless_1 */        {
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {TRUE , Typeless_1 },
        /* Short_Typeless_Const */      {TRUE , Typeless_1 },
        /* Typeless_1 */        {TRUE , Typeless_1 },
        /* Typeless_2 */        {TRUE , Typeless_2 },
        /* Typeless_4 */        {TRUE , Typeless_4 },
        /* Typeless_8 */        {TRUE , Typeless_8 },
        /* Long_Typeless */     {FALSE, Err_Res    },
        /* Integer_1      */    {TRUE , Integer_1  },
        /* Integer_2      */    {TRUE , Integer_2  },
        /* Integer_4      */    {TRUE , Integer_4  },
        /* Integer_8      */    {TRUE , Integer_8  },
        /* Real_4     */        {FALSE, Err_Res    },
        /* Real_8     */        {FALSE, Err_Res    },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
        /* CRI_Ptr_8      */    {FALSE, Err_Res    },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */       {FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
                        },
/* Typeless_2 */        {
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {TRUE , Typeless_2 },
        /* Short_Typeless_Const */      {TRUE , Typeless_2 },
        /* Typeless_1 */        {TRUE , Typeless_2 },
        /* Typeless_2 */        {TRUE , Typeless_2 },
        /* Typeless_4 */        {TRUE , Typeless_4 },
        /* Typeless_8 */        {TRUE , Typeless_8 },
        /* Long_Typeless */     {FALSE, Err_Res    },
        /* Integer_1      */    {TRUE , Integer_1  },
        /* Integer_2      */    {TRUE , Integer_2  },
        /* Integer_4      */    {TRUE , Integer_4  },
        /* Integer_8      */    {TRUE , Integer_8      },
        /* Real_4     */        {FALSE, Err_Res    },
        /* Real_8     */        {FALSE, Err_Res    },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
        /* CRI_Ptr_8      */    {FALSE, Err_Res    },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */       {FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
                        },
/* Typeless_4 */	{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Typeless_4 },
	/* Short_Typeless_Const */	{TRUE , Typeless_4 },
	/* Typeless_1 */	{TRUE , Typeless_4 },
	/* Typeless_2 */	{TRUE , Typeless_4 },
	/* Typeless_4 */	{TRUE , Typeless_4 },
	/* Typeless_8 */	{TRUE , Typeless_8 },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{TRUE , Integer_1  },
	/* Integer_2      */	{TRUE , Integer_2  },
	/* Integer_4      */	{TRUE , Integer_4  },
	/* Integer_8      */	{TRUE , Integer_8      },
	/* Real_4     */	{TRUE , Real_4     },
        /* Real_8     */        {FALSE, Err_Res    },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Typeless_8 */	{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Typeless_8 },
	/* Short_Typeless_Const */	{TRUE , Typeless_8 },
	/* Typeless_1 */	{TRUE , Typeless_8 },
	/* Typeless_2 */	{TRUE , Typeless_8 },
	/* Typeless_4 */	{TRUE , Typeless_8 },
	/* Typeless_8 */	{TRUE , Typeless_8 },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{TRUE , Integer_1  },
	/* Integer_2      */	{TRUE , Integer_2  },
	/* Integer_4      */	{TRUE , Integer_4  },
	/* Integer_8      */	{TRUE , Integer_8      },
	/* Real_4     */	{TRUE , Real_4     },
        /* Real_8     */        {TRUE , Real_8     },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Long_Typeless */	{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Integer_1 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Integer_1  },
	/* Short_Typeless_Const */	{TRUE , Integer_1  },
	/* Typeless_1 */	{TRUE , Integer_1  },
	/* Typeless_2 */	{TRUE , Integer_1  },
	/* Typeless_4 */	{TRUE , Integer_1  },
	/* Typeless_8 */	{TRUE , Integer_1  },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Integer_1      },
	/* Integer_2      */	{FALSE, Integer_2      },
	/* Integer_4      */	{FALSE, Integer_4      },
	/* Integer_8      */	{FALSE, Integer_8      },
	/* Real_4     */	{FALSE, Real_4     },
	/* Real_8     */	{FALSE, Real_8     },
	/* Real_16    */	{FALSE, Real_16    },
	/* Complex_4     */	{FALSE, Complex_4     },
	/* Complex_8     */	{FALSE, Complex_8     },
	/* Complex_16    */	{FALSE, Complex_16    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Integer_2 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Integer_2  },
	/* Short_Typeless_Const */	{TRUE , Integer_2  },
	/* Typeless_1 */	{TRUE , Integer_2  },
	/* Typeless_2 */	{TRUE , Integer_2  },
	/* Typeless_4 */	{TRUE , Integer_2  },
	/* Typeless_8 */	{TRUE , Integer_2  },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Integer_2      },
	/* Integer_2      */	{FALSE, Integer_2      },
	/* Integer_4      */	{FALSE, Integer_4      },
	/* Integer_8      */	{FALSE, Integer_8      },
	/* Real_4     */	{FALSE, Real_4     },
	/* Real_8     */	{FALSE, Real_8     },
	/* Real_16    */	{FALSE, Real_16    },
	/* Complex_4     */	{FALSE, Complex_4     },
	/* Complex_8     */	{FALSE, Complex_8     },
	/* Complex_16    */	{FALSE, Complex_16    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Integer_4 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Integer_4  },
	/* Short_Typeless_Const */	{TRUE , Integer_4  },
	/* Typeless_1 */	{TRUE , Integer_4  },
	/* Typeless_2 */	{TRUE , Integer_4  },
	/* Typeless_4 */	{TRUE , Integer_4  },
	/* Typeless_8 */	{TRUE , Integer_4  },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Integer_4      },
	/* Integer_2      */	{FALSE, Integer_4      },
	/* Integer_4      */	{FALSE, Integer_4      },
	/* Integer_8      */	{FALSE, Integer_8      },
	/* Real_4     */	{FALSE, Real_4     },
	/* Real_8     */	{FALSE, Real_8     },
	/* Real_16    */	{FALSE, Real_16    },
	/* Complex_4     */	{FALSE, Complex_4     },
	/* Complex_8     */	{FALSE, Complex_8     },
	/* Complex_16    */	{FALSE, Complex_16    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Integer_8 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Integer_8      },
	/* Short_Typeless_Const */	{TRUE , Integer_8      },
	/* Typeless_1 */	{TRUE , Integer_8      },
	/* Typeless_2 */	{TRUE , Integer_8      },
	/* Typeless_4 */	{TRUE , Integer_8      },
	/* Typeless_8 */	{TRUE , Integer_8      },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Integer_8      },
	/* Integer_2      */	{FALSE, Integer_8      },
	/* Integer_4      */	{FALSE, Integer_8      },
	/* Integer_8      */	{FALSE, Integer_8      },
	/* Real_4     */	{FALSE, Real_4     },
	/* Real_8     */	{FALSE, Real_8     },
	/* Real_16    */	{FALSE, Real_16    },
	/* Complex_4     */	{FALSE, Complex_4     },
	/* Complex_8     */	{FALSE, Complex_8     },
	/* Complex_16    */	{FALSE, Complex_16    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Real_4 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Real_4     },
	/* Short_Typeless_Const */	{TRUE , Real_4     },
	/* Typeless_1 */	{FALSE, Err_Res    },
	/* Typeless_2 */	{FALSE, Err_Res    },
	/* Typeless_4 */	{TRUE , Real_4     },
	/* Typeless_8 */	{TRUE , Real_4     },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Real_4     },
	/* Integer_2      */	{FALSE, Real_4     },
	/* Integer_4      */	{FALSE, Real_4     },
	/* Integer_8      */	{FALSE, Real_4     },
	/* Real_4     */	{FALSE, Real_4     },
	/* Real_8     */	{FALSE, Real_8     },
	/* Real_16    */	{FALSE, Real_16    },
	/* Complex_4     */	{FALSE, Complex_4     },
	/* Complex_8     */	{FALSE, Complex_8     },
	/* Complex_16    */	{FALSE, Complex_16    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Real_8 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
        /* Short_Char_Const */        {TRUE , Real_8     },
        /* Short_Typeless_Const */        {TRUE , Real_8     },
        /* Typeless_1 */        {FALSE, Err_Res    },
        /* Typeless_2 */        {FALSE, Err_Res    },
        /* Typeless_4 */        {FALSE, Err_Res    },
        /* Typeless_8 */        {TRUE , Real_8     },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Real_8     },
	/* Integer_2      */	{FALSE, Real_8     },
	/* Integer_4      */	{FALSE, Real_8     },
	/* Integer_8      */	{FALSE, Real_8     },
	/* Real_4     */	{FALSE, Real_8     },
	/* Real_8     */	{FALSE, Real_8     },
	/* Real_16    */	{FALSE, Real_16    },
	/* Complex_4     */	{FALSE, Complex_8     },
	/* Complex_8     */	{FALSE, Complex_8     },
	/* Complex_16    */	{FALSE, Complex_16    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Real_16 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Real_16    },
	/* Short_Typeless_Const */	{TRUE , Real_16    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Real_16    },
	/* Integer_2      */	{FALSE, Real_16    },
	/* Integer_4      */	{FALSE, Real_16    },
	/* Integer_8      */	{FALSE, Real_16    },
	/* Real_4     */	{FALSE, Real_16    },
	/* Real_8     */	{FALSE, Real_16    },
	/* Real_16    */	{FALSE, Real_16    },
	/* Complex_4     */	{FALSE, Complex_16    },
	/* Complex_8     */	{FALSE, Complex_16    },
	/* Complex_16    */	{FALSE, Complex_16    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Complex_4 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Complex_4  },
	/* Short_Typeless_Const */	{TRUE , Complex_4  },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Complex_4     },
	/* Integer_2      */	{FALSE, Complex_4     },
	/* Integer_4      */	{FALSE, Complex_4     },
	/* Integer_8      */	{FALSE, Complex_4     },
	/* Real_4     */	{FALSE, Complex_4     },
	/* Real_8     */	{FALSE, Complex_8     },
	/* Real_16    */	{FALSE, Complex_16    },
	/* Complex_4     */	{FALSE, Complex_4     },
	/* Complex_8     */	{FALSE, Complex_8     },
	/* Complex_16    */	{FALSE, Complex_16    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Complex_8 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Complex_8  },
	/* Short_Typeless_Const */	{TRUE , Complex_8  },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Complex_8     },
	/* Integer_2      */	{FALSE, Complex_8     },
	/* Integer_4      */	{FALSE, Complex_8     },
	/* Integer_8      */	{FALSE, Complex_8     },
	/* Real_4     */	{FALSE, Complex_8     },
	/* Real_8     */	{FALSE, Complex_8     },
	/* Real_16    */	{FALSE, Complex_16    },
	/* Complex_4     */	{FALSE, Complex_8     },
	/* Complex_8     */	{FALSE, Complex_8     },
	/* Complex_16    */	{FALSE, Complex_16    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Complex_16 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Complex_16 },
	/* Short_Typeless_Const */	{TRUE , Complex_16 },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Complex_16    },
	/* Integer_2      */	{FALSE, Complex_16    },
	/* Integer_4      */	{FALSE, Complex_16    },
	/* Integer_8      */	{FALSE, Complex_16    },
	/* Real_4     */	{FALSE, Complex_16    },
	/* Real_8     */	{FALSE, Complex_16    },
	/* Real_16    */	{FALSE, Complex_16    },
	/* Complex_4     */	{FALSE, Complex_16    },
	/* Complex_8     */	{FALSE, Complex_16    },
	/* Complex_16    */	{FALSE, Complex_16    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* CRI_Ptr_8 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Logical_1 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Logical_2 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Logical_4 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Logical_8 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Character_1 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Character_2 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Character_4 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* CRI_Ch_Ptr_8 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Structure_Type   */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* CRI_Parcel_Ptr_8   */          {
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {FALSE, Err_Res    },
        /* Short_Typeless_Const */    {FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
        /* Long_Typeless */     {FALSE, Err_Res    },
        /* Integer_1      */    {FALSE, Err_Res    },
        /* Integer_2      */    {FALSE, Err_Res    },
        /* Integer_4      */    {FALSE, Err_Res    },
        /* Integer_8      */    {FALSE, Err_Res    },
        /* Real_4     */        {FALSE, Err_Res    },
        /* Real_8     */        {FALSE, Err_Res    },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
        /* CRI_Ptr_8      */    {FALSE, Err_Res    },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */       {FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
                        }
		};

exp_tbl_type	power_tbl[Num_Linear_Types][Num_Linear_Types] = {
/* Err_Res */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Short_Char_Const */	{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Short_Typeless_Const },
	/* Short_Typeless_Const */	{TRUE , Short_Typeless_Const },
	/* Typeless_1 */	{TRUE , Typeless_1 },
	/* Typeless_2 */	{TRUE , Typeless_2 },
	/* Typeless_4 */	{TRUE , Typeless_4 },
	/* Typeless_8 */	{TRUE , Typeless_8 },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{TRUE , Integer_1  },
	/* Integer_2      */	{TRUE , Integer_2  },
	/* Integer_4      */	{TRUE , Integer_4  },
	/* Integer_8      */	{TRUE , Integer_8  },
	/* Real_4     */	{TRUE , Real_4     },
	/* Real_8     */	{TRUE , Real_8     },
	/* Real_16    */	{TRUE , Real_16    },
	/* Complex_4     */	{TRUE , Complex_4  },
	/* Complex_8     */	{TRUE , Complex_8  },
	/* Complex_16    */	{TRUE , Complex_16 },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Short_Typeless_Const */	{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Short_Typeless_Const },
	/* Short_Typeless_Const */	{TRUE , Short_Typeless_Const },
	/* Typeless_1 */	{TRUE , Typeless_1 },
	/* Typeless_2 */	{TRUE , Typeless_2 },
	/* Typeless_4 */	{TRUE , Typeless_4 },
	/* Typeless_8 */	{TRUE , Typeless_8 },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{TRUE , Integer_1  },
	/* Integer_2      */	{TRUE , Integer_2  },
	/* Integer_4      */	{TRUE , Integer_4  },
	/* Integer_8      */	{TRUE , Integer_8  },
	/* Real_4     */	{TRUE , Real_4     },
	/* Real_8     */	{TRUE , Real_8     },
	/* Real_16    */	{TRUE , Real_16    },
	/* Complex_4     */	{TRUE , Complex_4  },
	/* Complex_8     */	{TRUE , Complex_8  },
	/* Complex_16    */	{TRUE , Complex_16 },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Typeless_1 */        {
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {FALSE, Err_Res       },
        /* Short_Typeless_Const */      {FALSE, Err_Res       },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
        /* Long_Typeless */     {FALSE, Err_Res    },
        /* Integer_1      */    {FALSE, Err_Res    },
        /* Integer_2      */    {FALSE, Err_Res    },
        /* Integer_4      */    {FALSE, Err_Res    },
        /* Integer_8      */    {FALSE, Err_Res    },
        /* Real_4     */        {FALSE, Err_Res    },
        /* Real_8     */        {FALSE, Err_Res    },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
        /* CRI_Ptr_8      */    {FALSE, Err_Res    },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */       {FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
                        },
/* Typeless_2 */        {
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {FALSE, Err_Res       },
        /* Short_Typeless_Const */      {FALSE, Err_Res       },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
        /* Long_Typeless */     {FALSE, Err_Res    },
        /* Integer_1      */    {FALSE, Err_Res    },
        /* Integer_2      */    {FALSE, Err_Res    },
        /* Integer_4      */    {FALSE, Err_Res    },
        /* Integer_8      */    {FALSE, Err_Res    },
        /* Real_4     */        {FALSE, Err_Res    },
        /* Real_8     */        {FALSE, Err_Res    },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
        /* CRI_Ptr_8      */    {FALSE, Err_Res    },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */       {FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
                        },
/* Typeless_4 */	{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res       },
	/* Short_Typeless_Const */	{FALSE, Err_Res       },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Typeless_8 */	{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res       },
	/* Short_Typeless_Const */	{FALSE, Err_Res       },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Long_Typeless */	{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Integer_1 */         {
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {TRUE , Integer_1 },
        /* Short_Typeless_Const */        {TRUE , Integer_1 },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
        /* Long_Typeless */        {FALSE, Err_Res    },
        /* Integer_1      */    {FALSE, Integer_1      },
        /* Integer_2      */    {FALSE, Integer_2      },
        /* Integer_4      */    {FALSE, Integer_4      },
        /* Integer_8      */    {FALSE, Integer_8      },
        /* Real_4     */        {FALSE, Real_4     },
        /* Real_8     */        {FALSE, Real_8     },
        /* Real_16    */        {FALSE, Real_16    },
        /* Complex_4     */     {FALSE, Complex_4     },
        /* Complex_8     */     {FALSE, Complex_8     },
        /* Complex_16    */     {FALSE, Complex_16    },
        /* CRI_Ptr_8      */    {FALSE, Err_Res    },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */        {FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
                        },
/* Integer_2 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Integer_2 },
	/* Short_Typeless_Const */	{TRUE , Integer_2 },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Integer_2      },
	/* Integer_2      */	{FALSE, Integer_2      },
	/* Integer_4      */	{FALSE, Integer_4      },
	/* Integer_8      */	{FALSE, Integer_8      },
	/* Real_4     */	{FALSE, Real_4     },
	/* Real_8     */	{FALSE, Real_8     },
	/* Real_16    */	{FALSE, Real_16    },
	/* Complex_4     */	{FALSE, Complex_4     },
	/* Complex_8     */	{FALSE, Complex_8     },
	/* Complex_16    */	{FALSE, Complex_16    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Integer_4 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Integer_4 },
	/* Short_Typeless_Const */	{TRUE , Integer_4 },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Integer_4      },
	/* Integer_2      */	{FALSE, Integer_4      },
	/* Integer_4      */	{FALSE, Integer_4      },
	/* Integer_8      */	{FALSE, Integer_8      },
	/* Real_4     */	{FALSE, Real_4     },
	/* Real_8     */	{FALSE, Real_8     },
	/* Real_16    */	{FALSE, Real_16    },
	/* Complex_4     */	{FALSE, Complex_4     },
	/* Complex_8     */	{FALSE, Complex_8     },
	/* Complex_16    */	{FALSE, Complex_16    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Integer_8 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Integer_8 },
	/* Short_Typeless_Const */	{TRUE , Integer_8 },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Integer_8      },
	/* Integer_2      */	{FALSE, Integer_8      },
	/* Integer_4      */	{FALSE, Integer_8      },
	/* Integer_8      */	{FALSE, Integer_8      },
	/* Real_4     */	{FALSE, Real_4     },
	/* Real_8     */	{FALSE, Real_8     },
	/* Real_16    */	{FALSE, Real_16    },
	/* Complex_4     */	{FALSE, Complex_4     },
	/* Complex_8     */	{FALSE, Complex_8     },
	/* Complex_16    */	{FALSE, Complex_16    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Real_4 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Real_4 },
	/* Short_Typeless_Const */	{TRUE , Real_4 },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Real_4     },
	/* Integer_2      */	{FALSE, Real_4     },
	/* Integer_4      */	{FALSE, Real_4     },
	/* Integer_8      */	{FALSE, Real_4     },
	/* Real_4     */	{FALSE, Real_4     },
	/* Real_8     */	{FALSE, Real_8     },
	/* Real_16    */	{FALSE, Real_16    },
	/* Complex_4     */	{FALSE, Complex_4     },
	/* Complex_8     */	{FALSE, Complex_8     },
	/* Complex_16    */	{FALSE, Complex_16    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Real_8 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Real_8 },
	/* Short_Typeless_Const */	{TRUE , Real_8 },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Real_8     },
	/* Integer_2      */	{FALSE, Real_8     },
	/* Integer_4      */	{FALSE, Real_8     },
	/* Integer_8      */	{FALSE, Real_8     },
	/* Real_4     */	{FALSE, Real_8     },
	/* Real_8     */	{FALSE, Real_8     },
	/* Real_16    */	{FALSE, Real_16    },
	/* Complex_4     */	{FALSE, Complex_8     },
	/* Complex_8     */	{FALSE, Complex_8     },
	/* Complex_16    */	{FALSE, Complex_16    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Real_16 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Real_16    },
	/* Short_Typeless_Const */	{TRUE , Real_16    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Real_16    },
	/* Integer_2      */	{FALSE, Real_16    },
	/* Integer_4      */	{FALSE, Real_16    },
	/* Integer_8      */	{FALSE, Real_16    },
	/* Real_4     */	{FALSE, Real_16    },
	/* Real_8     */	{FALSE, Real_16    },
	/* Real_16    */	{FALSE, Real_16    },
	/* Complex_4     */	{FALSE, Complex_16    },
	/* Complex_8     */	{FALSE, Complex_16    },
	/* Complex_16    */	{FALSE, Complex_16    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Complex_4 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Complex_4  },
	/* Short_Typeless_Const */	{TRUE , Complex_4  },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Complex_4     },
	/* Integer_2      */	{FALSE, Complex_4     },
	/* Integer_4      */	{FALSE, Complex_4     },
	/* Integer_8      */	{FALSE, Complex_4     },
	/* Real_4     */	{FALSE, Complex_4     },
	/* Real_8     */	{FALSE, Complex_8     },
	/* Real_16    */	{FALSE, Complex_16    },
	/* Complex_4     */	{FALSE, Complex_4     },
	/* Complex_8     */	{FALSE, Complex_8     },
	/* Complex_16    */	{FALSE, Complex_16    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Complex_8 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Complex_8  },
	/* Short_Typeless_Const */	{TRUE , Complex_8  },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Complex_8     },
	/* Integer_2      */	{FALSE, Complex_8     },
	/* Integer_4      */	{FALSE, Complex_8     },
	/* Integer_8      */	{FALSE, Complex_8     },
	/* Real_4     */	{FALSE, Complex_8     },
	/* Real_8     */	{FALSE, Complex_8     },
	/* Real_16    */	{FALSE, Complex_16    },
	/* Complex_4     */	{FALSE, Complex_8     },
	/* Complex_8     */	{FALSE, Complex_8     },
	/* Complex_16    */	{FALSE, Complex_16    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Complex_16 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Complex_16 },
	/* Short_Typeless_Const */	{TRUE , Complex_16 },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Complex_16    },
	/* Integer_2      */	{FALSE, Complex_16    },
	/* Integer_4      */	{FALSE, Complex_16    },
	/* Integer_8      */	{FALSE, Complex_16    },
	/* Real_4     */	{FALSE, Complex_16    },
	/* Real_8     */	{FALSE, Complex_16    },
	/* Real_16    */	{FALSE, Complex_16    },
	/* Complex_4     */	{FALSE, Complex_16    },
	/* Complex_8     */	{FALSE, Complex_16    },
	/* Complex_16    */	{FALSE, Complex_16    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* CRI_Ptr_8 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Logical_1 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Logical_2 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Logical_4 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Logical_8 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Character_1 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Character_2 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Character_4 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* CRI_Ch_Ptr_8 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Structure_Type   */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* CRI_Parcel_Ptr_8   */          {
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {FALSE, Err_Res    },
        /* Short_Typeless_Const */    {FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
        /* Long_Typeless */     {FALSE, Err_Res    },
        /* Integer_1      */    {FALSE, Err_Res    },
        /* Integer_2      */    {FALSE, Err_Res    },
        /* Integer_4      */    {FALSE, Err_Res    },
        /* Integer_8      */    {FALSE, Err_Res    },
        /* Real_4     */        {FALSE, Err_Res    },
        /* Real_8     */        {FALSE, Err_Res    },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
        /* CRI_Ptr_8      */    {FALSE, Err_Res    },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */       {FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
                        }
		};


exp_tbl_type	eq_ne_tbl[Num_Linear_Types][Num_Linear_Types] = {
/* Err_Res */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Short_Char_Const */	{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Short_Typeless_Const */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_1 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_2 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_4 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_8 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_2      */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_4      */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_8      */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Real_4     */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Real_8     */        {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Real_16    */        {TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Complex_4     */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Complex_8     */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Complex_16    */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Character_2       */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Character_4       */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Short_Typeless_Const */	{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Short_Typeless_Const */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_1 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_2 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_4 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_8 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_2      */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_4      */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_8      */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Real_4     */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Real_8     */        {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Real_16    */        {TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Complex_4     */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Complex_8     */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Complex_16    */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* CRI_Ptr_8      */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , CG_LOGICAL_DEFAULT_TYPE }
			},
/* Typeless_1 */        {
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Short_Typeless_Const */      {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Typeless_1 */        {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Typeless_2 */        {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Typeless_4 */        {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Typeless_8 */        {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Long_Typeless */     {FALSE, Err_Res    },
        /* Integer_1      */    {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Integer_2      */    {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Integer_4      */    {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Integer_8      */    {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Real_4     */        {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Real_8     */        {FALSE, Err_Res    },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
        /* CRI_Ptr_8      */    {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */       {FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , CG_LOGICAL_DEFAULT_TYPE }
                        },
/* Typeless_2 */        {
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Short_Typeless_Const */      {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Typeless_1 */        {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Typeless_2 */        {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Typeless_4 */        {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Typeless_8 */        {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Long_Typeless */     {FALSE, Err_Res    },
        /* Integer_1      */    {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Integer_2      */    {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Integer_4      */    {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Integer_8      */    {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Real_4     */        {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Real_8     */        {FALSE, Err_Res    },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
        /* CRI_Ptr_8      */    {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */       {FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , CG_LOGICAL_DEFAULT_TYPE }
                        },
/* Typeless_4 */	{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Short_Typeless_Const */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_1 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_2 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_4 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_8 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_2      */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_4      */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_8      */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Real_4     */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Real_8     */        {FALSE, Err_Res    },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , CG_LOGICAL_DEFAULT_TYPE }
			},
/* Typeless_8 */	{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Short_Typeless_Const */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_1 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_2 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_4 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_8 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_2      */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_4      */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_8      */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Real_4     */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Real_8     */        {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , CG_LOGICAL_DEFAULT_TYPE }
			},
/* Long_Typeless */	{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Integer_1 */         {
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Short_Typeless_Const */        {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Typeless_1 */        {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Typeless_2 */        {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Typeless_4 */        {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Typeless_8 */        {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Long_Typeless */        {FALSE, Err_Res    },
        /* Integer_1      */    {FALSE, CG_LOGICAL_DEFAULT_TYPE },
        /* Integer_2      */    {FALSE, CG_LOGICAL_DEFAULT_TYPE },
        /* Integer_4      */    {FALSE, CG_LOGICAL_DEFAULT_TYPE },
        /* Integer_8      */    {FALSE, CG_LOGICAL_DEFAULT_TYPE },
        /* Real_4     */        {FALSE, CG_LOGICAL_DEFAULT_TYPE },
        /* Real_8     */        {FALSE, CG_LOGICAL_DEFAULT_TYPE },
        /* Real_16    */        {FALSE, CG_LOGICAL_DEFAULT_TYPE },
        /* Complex_4     */     {FALSE, CG_LOGICAL_DEFAULT_TYPE },
        /* Complex_8     */     {FALSE, CG_LOGICAL_DEFAULT_TYPE },
        /* Complex_16    */     {FALSE, CG_LOGICAL_DEFAULT_TYPE },
        /* CRI_Ptr_8      */    {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */        {FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , CG_LOGICAL_DEFAULT_TYPE }
                        },
/* Integer_2 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Short_Typeless_Const */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Typeless_1 */        {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Typeless_2 */        {TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_4 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_8 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_2      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_4      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_8      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Real_4     */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Real_8     */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Real_16    */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Complex_4     */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Complex_8     */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Complex_16    */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* CRI_Ptr_8      */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , CG_LOGICAL_DEFAULT_TYPE }
			},
/* Integer_4 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Short_Typeless_Const */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Typeless_1 */        {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Typeless_2 */        {TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_4 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_8 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_2      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_4      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_8      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Real_4     */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Real_8     */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Real_16    */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Complex_4     */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Complex_8     */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Complex_16    */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* CRI_Ptr_8      */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , CG_LOGICAL_DEFAULT_TYPE }
			},
/* Integer_8 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Short_Typeless_Const */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Typeless_1 */        {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Typeless_2 */        {TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_4 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_8 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_2      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_4      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_8      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Real_4     */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Real_8     */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Real_16    */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Complex_4     */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Complex_8     */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Complex_16    */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* CRI_Ptr_8      */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , CG_LOGICAL_DEFAULT_TYPE }
			},
/* Real_4 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Short_Typeless_Const */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Typeless_1 */        {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Typeless_2 */        {TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_4 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_8 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_2      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_4      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_8      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Real_4     */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Real_8     */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Real_16    */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Complex_4     */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Complex_8     */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Complex_16    */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Real_8 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
        /* Short_Char_Const */        {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Short_Typeless_Const */        {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Typeless_1 */        {FALSE, Err_Res    },
        /* Typeless_2 */        {FALSE, Err_Res    },
        /* Typeless_4 */        {FALSE, Err_Res    },
        /* Typeless_8 */        {TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_2      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_4      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_8      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Real_4     */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Real_8     */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Real_16    */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Complex_4     */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Complex_8     */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Complex_16    */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Real_16 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Short_Typeless_Const */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Typeless_1 */        {FALSE, Err_Res    },
        /* Typeless_2 */        {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_2      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_4      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_8      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Real_4     */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Real_8     */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Real_16    */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Complex_4     */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Complex_8     */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Complex_16    */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Complex_4 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Short_Typeless_Const */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Typeless_1 */        {FALSE, Err_Res    },
        /* Typeless_2 */        {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_2      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_4      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_8      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Real_4     */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Real_8     */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Real_16    */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Complex_4     */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Complex_8     */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Complex_16    */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Complex_8 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Short_Typeless_Const */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_2      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_4      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_8      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Real_4     */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Real_8     */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Real_16    */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Complex_4     */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Complex_8     */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Complex_16    */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Complex_16 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Short_Typeless_Const */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_2      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_4      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_8      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Real_4     */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Real_8     */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Real_16    */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Complex_4     */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Complex_8     */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Complex_16    */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* CRI_Ptr_8 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_1 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_2 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_4 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_8 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_2      */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_4      */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_8      */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , CG_LOGICAL_DEFAULT_TYPE }
			},
/* Logical_1 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Logical_2 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Logical_4 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Logical_8 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Character_1 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Character_2       */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Character_4       */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Character_2 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Character_2       */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Character_4       */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Character_4 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Character_2       */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Character_4       */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* CRI_Ch_Ptr_8 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Structure_Type   */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* CRI_Parcel_Ptr_8   */          {
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {FALSE, Err_Res    },
        /* Short_Typeless_Const */    {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Typeless_1 */    {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Typeless_2 */    {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Typeless_4 */    {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Typeless_8 */    {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Long_Typeless */     {FALSE, Err_Res    },
        /* Integer_1      */    {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Integer_2      */    {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Integer_4      */    {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Integer_8      */    {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Real_4     */        {FALSE, Err_Res    },
        /* Real_8     */        {FALSE, Err_Res    },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
        /* CRI_Ptr_8      */    {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */       {FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , CG_LOGICAL_DEFAULT_TYPE }
                        }
		};

exp_tbl_type	lg_tbl[Num_Linear_Types][Num_Linear_Types] = {
/* Err_Res */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Short_Char_Const */	{
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {FALSE, Err_Res    },
        /* Short_Typeless_Const */      {FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
        /* Long_Typeless */     {FALSE, Err_Res    },
        /* Integer_1      */    {FALSE, Err_Res    },
        /* Integer_2      */    {FALSE, Err_Res    },
        /* Integer_4      */    {FALSE, Err_Res    },
        /* Integer_8      */    {FALSE, Err_Res    },
        /* Real_4     */        {FALSE, Err_Res    },
        /* Real_8     */        {FALSE, Err_Res    },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
        /* CRI_Ptr_8      */    {FALSE, Err_Res    },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */       {FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Short_Typeless_Const */	{
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {FALSE, Err_Res    },
        /* Short_Typeless_Const */      {FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
        /* Long_Typeless */     {FALSE, Err_Res    },
        /* Integer_1      */    {FALSE, Err_Res    },
        /* Integer_2      */    {FALSE, Err_Res    },
        /* Integer_4      */    {FALSE, Err_Res    },
        /* Integer_8      */    {FALSE, Err_Res    },
        /* Real_4     */        {FALSE, Err_Res    },
        /* Real_8     */        {FALSE, Err_Res    },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
        /* CRI_Ptr_8      */    {FALSE, Err_Res    },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */       {FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Typeless_1 */        {
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {FALSE, Err_Res    },
        /* Short_Typeless_Const */      {FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
        /* Long_Typeless */     {FALSE, Err_Res    },
        /* Integer_1      */    {FALSE, Err_Res    },
        /* Integer_2      */    {FALSE, Err_Res    },
        /* Integer_4      */    {FALSE, Err_Res    },
        /* Integer_8      */    {FALSE, Err_Res    },
        /* Real_4     */        {FALSE, Err_Res    },
        /* Real_8     */        {FALSE, Err_Res    },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
        /* CRI_Ptr_8      */    {FALSE, Err_Res    },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */       {FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
                        },
/* Typeless_2 */        {
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {FALSE, Err_Res    },
        /* Short_Typeless_Const */      {FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
        /* Long_Typeless */     {FALSE, Err_Res    },
        /* Integer_1      */    {FALSE, Err_Res    },
        /* Integer_2      */    {FALSE, Err_Res    },
        /* Integer_4      */    {FALSE, Err_Res    },
        /* Integer_8      */    {FALSE, Err_Res    },
        /* Real_4     */        {FALSE, Err_Res    },
        /* Real_8     */        {FALSE, Err_Res    },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
        /* CRI_Ptr_8      */    {FALSE, Err_Res    },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */       {FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
                        },
/* Typeless_4 */	{
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {FALSE, Err_Res    },
        /* Short_Typeless_Const */      {FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
        /* Long_Typeless */     {FALSE, Err_Res    },
        /* Integer_1      */    {FALSE, Err_Res    },
        /* Integer_2      */    {FALSE, Err_Res    },
        /* Integer_4      */    {FALSE, Err_Res    },
        /* Integer_8      */    {FALSE, Err_Res    },
        /* Real_4     */        {FALSE, Err_Res    },
        /* Real_8     */        {FALSE, Err_Res    },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
        /* CRI_Ptr_8      */    {FALSE, Err_Res    },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */       {FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Typeless_8 */	{
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {FALSE, Err_Res    },
        /* Short_Typeless_Const */      {FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
        /* Long_Typeless */     {FALSE, Err_Res    },
        /* Integer_1      */    {FALSE, Err_Res    },
        /* Integer_2      */    {FALSE, Err_Res    },
        /* Integer_4      */    {FALSE, Err_Res    },
        /* Integer_8      */    {FALSE, Err_Res    },
        /* Real_4     */        {FALSE, Err_Res    },
        /* Real_8     */        {FALSE, Err_Res    },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
        /* CRI_Ptr_8      */    {FALSE, Err_Res    },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */       {FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Long_Typeless */	{
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {FALSE, Err_Res    },
        /* Short_Typeless_Const */      {FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
        /* Long_Typeless */     {FALSE, Err_Res    },
        /* Integer_1      */    {FALSE, Err_Res    },
        /* Integer_2      */    {FALSE, Err_Res    },
        /* Integer_4      */    {FALSE, Err_Res    },
        /* Integer_8      */    {FALSE, Err_Res    },
        /* Real_4     */        {FALSE, Err_Res    },
        /* Real_8     */        {FALSE, Err_Res    },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
        /* CRI_Ptr_8      */    {FALSE, Err_Res    },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */       {FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Integer_1 */         {
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {FALSE, Err_Res    },
        /* Short_Typeless_Const */      {FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
        /* Long_Typeless */     {FALSE, Err_Res    },
        /* Integer_1      */    {FALSE, Err_Res    },
        /* Integer_2      */    {FALSE, Err_Res    },
        /* Integer_4      */    {FALSE, Err_Res    },
        /* Integer_8      */    {FALSE, Err_Res    },
        /* Real_4     */        {FALSE, Err_Res    },
        /* Real_8     */        {FALSE, Err_Res    },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
        /* CRI_Ptr_8      */    {FALSE, Err_Res    },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */       {FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
                        },
/* Integer_2 */		{
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {FALSE, Err_Res    },
        /* Short_Typeless_Const */      {FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
        /* Long_Typeless */     {FALSE, Err_Res    },
        /* Integer_1      */    {FALSE, Err_Res    },
        /* Integer_2      */    {FALSE, Err_Res    },
        /* Integer_4      */    {FALSE, Err_Res    },
        /* Integer_8      */    {FALSE, Err_Res    },
        /* Real_4     */        {FALSE, Err_Res    },
        /* Real_8     */        {FALSE, Err_Res    },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
        /* CRI_Ptr_8      */    {FALSE, Err_Res    },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */       {FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Integer_4 */		{
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {FALSE, Err_Res    },
        /* Short_Typeless_Const */      {FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
        /* Long_Typeless */     {FALSE, Err_Res    },
        /* Integer_1      */    {FALSE, Err_Res    },
        /* Integer_2      */    {FALSE, Err_Res    },
        /* Integer_4      */    {FALSE, Err_Res    },
        /* Integer_8      */    {FALSE, Err_Res    },
        /* Real_4     */        {FALSE, Err_Res    },
        /* Real_8     */        {FALSE, Err_Res    },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
        /* CRI_Ptr_8      */    {FALSE, Err_Res    },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */       {FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Integer_8 */		{
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {FALSE, Err_Res    },
        /* Short_Typeless_Const */      {FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
        /* Long_Typeless */     {FALSE, Err_Res    },
        /* Integer_1      */    {FALSE, Err_Res    },
        /* Integer_2      */    {FALSE, Err_Res    },
        /* Integer_4      */    {FALSE, Err_Res    },
        /* Integer_8      */    {FALSE, Err_Res    },
        /* Real_4     */        {FALSE, Err_Res    },
        /* Real_8     */        {FALSE, Err_Res    },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
        /* CRI_Ptr_8      */    {FALSE, Err_Res    },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */       {FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Real_4 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
	/* Typeless_4 */	{FALSE, Err_Res    },
	/* Typeless_8 */	{FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Real_8     */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Real_16    */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Real_8 */		{
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {FALSE, Err_Res    },
        /* Short_Typeless_Const */      {FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
        /* Long_Typeless */     {FALSE, Err_Res    },
        /* Integer_1      */    {FALSE, Err_Res    },
        /* Integer_2      */    {FALSE, Err_Res    },
        /* Integer_4      */    {FALSE, Err_Res    },
        /* Integer_8      */    {FALSE, Err_Res    },
        /* Real_4     */        {FALSE, CG_LOGICAL_DEFAULT_TYPE },
        /* Real_8     */        {FALSE, CG_LOGICAL_DEFAULT_TYPE },
        /* Real_16    */        {FALSE, CG_LOGICAL_DEFAULT_TYPE },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
        /* CRI_Ptr_8      */    {FALSE, Err_Res    },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */       {FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Real_16 */		{
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {FALSE, Err_Res    },
        /* Short_Typeless_Const */      {FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
        /* Long_Typeless */     {FALSE, Err_Res    },
        /* Integer_1      */    {FALSE, Err_Res    },
        /* Integer_2      */    {FALSE, Err_Res    },
        /* Integer_4      */    {FALSE, Err_Res    },
        /* Integer_8      */    {FALSE, Err_Res    },
        /* Real_4     */        {FALSE, CG_LOGICAL_DEFAULT_TYPE },
        /* Real_8     */        {FALSE, CG_LOGICAL_DEFAULT_TYPE },
        /* Real_16    */        {FALSE, CG_LOGICAL_DEFAULT_TYPE },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
        /* CRI_Ptr_8      */    {FALSE, Err_Res    },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */       {FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Complex_4 */		{
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {FALSE, Err_Res    },
        /* Short_Typeless_Const */      {FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
        /* Long_Typeless */     {FALSE, Err_Res    },
        /* Integer_1      */    {FALSE, Err_Res    },
        /* Integer_2      */    {FALSE, Err_Res    },
        /* Integer_4      */    {FALSE, Err_Res    },
        /* Integer_8      */    {FALSE, Err_Res    },
        /* Real_4     */        {FALSE, Err_Res    },
        /* Real_8     */        {FALSE, Err_Res    },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
        /* CRI_Ptr_8      */    {FALSE, Err_Res    },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */       {FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Complex_8 */		{
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {FALSE, Err_Res    },
        /* Short_Typeless_Const */      {FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
        /* Long_Typeless */     {FALSE, Err_Res    },
        /* Integer_1      */    {FALSE, Err_Res    },
        /* Integer_2      */    {FALSE, Err_Res    },
        /* Integer_4      */    {FALSE, Err_Res    },
        /* Integer_8      */    {FALSE, Err_Res    },
        /* Real_4     */        {FALSE, Err_Res    },
        /* Real_8     */        {FALSE, Err_Res    },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
        /* CRI_Ptr_8      */    {FALSE, Err_Res    },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */       {FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Complex_16 */		{
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {FALSE, Err_Res    },
        /* Short_Typeless_Const */      {FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
        /* Long_Typeless */     {FALSE, Err_Res    },
        /* Integer_1      */    {FALSE, Err_Res    },
        /* Integer_2      */    {FALSE, Err_Res    },
        /* Integer_4      */    {FALSE, Err_Res    },
        /* Integer_8      */    {FALSE, Err_Res    },
        /* Real_4     */        {FALSE, Err_Res    },
        /* Real_8     */        {FALSE, Err_Res    },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
        /* CRI_Ptr_8      */    {FALSE, Err_Res    },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */       {FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* CRI_Ptr_8 */		{
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {FALSE, Err_Res    },
        /* Short_Typeless_Const */      {FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
        /* Long_Typeless */     {FALSE, Err_Res    },
        /* Integer_1      */    {FALSE, Err_Res    },
        /* Integer_2      */    {FALSE, Err_Res    },
        /* Integer_4      */    {FALSE, Err_Res    },
        /* Integer_8      */    {FALSE, Err_Res    },
        /* Real_4     */        {FALSE, Err_Res    },
        /* Real_8     */        {FALSE, Err_Res    },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
        /* CRI_Ptr_8      */    {FALSE, Err_Res    },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */       {FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Logical_1 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Logical_2 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Logical_4 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Logical_8 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Character_1 */		{
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {FALSE, Err_Res    },
        /* Short_Typeless_Const */      {FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
        /* Long_Typeless */     {FALSE, Err_Res    },
        /* Integer_1      */    {FALSE, Err_Res    },
        /* Integer_2      */    {FALSE, Err_Res    },
        /* Integer_4      */    {FALSE, Err_Res    },
        /* Integer_8      */    {FALSE, Err_Res    },
        /* Real_4     */        {FALSE, Err_Res    },
        /* Real_8     */        {FALSE, Err_Res    },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
        /* CRI_Ptr_8      */    {FALSE, Err_Res    },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */       {FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Character_2 */		{
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {FALSE, Err_Res    },
        /* Short_Typeless_Const */      {FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
        /* Long_Typeless */     {FALSE, Err_Res    },
        /* Integer_1      */    {FALSE, Err_Res    },
        /* Integer_2      */    {FALSE, Err_Res    },
        /* Integer_4      */    {FALSE, Err_Res    },
        /* Integer_8      */    {FALSE, Err_Res    },
        /* Real_4     */        {FALSE, Err_Res    },
        /* Real_8     */        {FALSE, Err_Res    },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
        /* CRI_Ptr_8      */    {FALSE, Err_Res    },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */       {FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Character_4 */		{
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {FALSE, Err_Res    },
        /* Short_Typeless_Const */      {FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
        /* Long_Typeless */     {FALSE, Err_Res    },
        /* Integer_1      */    {FALSE, Err_Res    },
        /* Integer_2      */    {FALSE, Err_Res    },
        /* Integer_4      */    {FALSE, Err_Res    },
        /* Integer_8      */    {FALSE, Err_Res    },
        /* Real_4     */        {FALSE, Err_Res    },
        /* Real_8     */        {FALSE, Err_Res    },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
        /* CRI_Ptr_8      */    {FALSE, Err_Res    },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */       {FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* CRI_Ch_Ptr_8 */		{
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {FALSE, Err_Res    },
        /* Short_Typeless_Const */      {FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
        /* Long_Typeless */     {FALSE, Err_Res    },
        /* Integer_1      */    {FALSE, Err_Res    },
        /* Integer_2      */    {FALSE, Err_Res    },
        /* Integer_4      */    {FALSE, Err_Res    },
        /* Integer_8      */    {FALSE, Err_Res    },
        /* Real_4     */        {FALSE, Err_Res    },
        /* Real_8     */        {FALSE, Err_Res    },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
        /* CRI_Ptr_8      */    {FALSE, Err_Res    },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */       {FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Structure_Type   */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* CRI_Parcel_Ptr_8   */          {
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {FALSE, Err_Res    },
        /* Short_Typeless_Const */      {FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
        /* Long_Typeless */     {FALSE, Err_Res    },
        /* Integer_1      */    {FALSE, Err_Res    },
        /* Integer_2      */    {FALSE, Err_Res    },
        /* Integer_4      */    {FALSE, Err_Res    },
        /* Integer_8      */    {FALSE, Err_Res    },
        /* Real_4     */        {FALSE, Err_Res    },
        /* Real_8     */        {FALSE, Err_Res    },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
        /* CRI_Ptr_8      */    {FALSE, Err_Res    },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */       {FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
                        }
		};


exp_tbl_type	gt_lt_tbl[Num_Linear_Types][Num_Linear_Types] = {
/* Err_Res */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Short_Char_Const */	{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Short_Typeless_Const */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_1 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_2 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_4 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_8 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_2      */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_4      */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_8      */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Real_4     */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Real_8     */        {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Real_16    */        {TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Complex_4     */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Complex_8     */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Complex_16    */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Character_2       */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Character_4       */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Short_Typeless_Const */	{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Short_Typeless_Const */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_1 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_2 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_4 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_8 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_2      */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_4      */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_8      */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Real_4     */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Real_8     */        {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Real_16    */        {TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Complex_4     */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Complex_8     */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Complex_16    */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* CRI_Ptr_8      */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , CG_LOGICAL_DEFAULT_TYPE }
			},
/* Typeless_1 */        {
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Short_Typeless_Const */      {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Typeless_1 */        {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Typeless_2 */        {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Typeless_4 */        {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Typeless_8 */        {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Long_Typeless */     {FALSE, Err_Res    },
        /* Integer_1      */    {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Integer_2      */    {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Integer_4      */    {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Integer_8      */    {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Real_4     */        {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Real_8     */        {FALSE, Err_Res    },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
        /* CRI_Ptr_8      */    {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */       {FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , CG_LOGICAL_DEFAULT_TYPE }
                        },
/* Typeless_2 */        {
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Short_Typeless_Const */      {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Typeless_1 */        {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Typeless_2 */        {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Typeless_4 */        {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Typeless_8 */        {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Long_Typeless */     {FALSE, Err_Res    },
        /* Integer_1      */    {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Integer_2      */    {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Integer_4      */    {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Integer_8      */    {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Real_4     */        {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Real_8     */        {FALSE, Err_Res    },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
        /* CRI_Ptr_8      */    {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */       {FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , CG_LOGICAL_DEFAULT_TYPE }
                        },
/* Typeless_4 */	{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Short_Typeless_Const */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_1 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_2 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_4 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_8 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_2      */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_4      */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_8      */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Real_4     */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Real_8     */        {FALSE, Err_Res    },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , CG_LOGICAL_DEFAULT_TYPE }
			},
/* Typeless_8 */	{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Short_Typeless_Const */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_1 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_2 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_4 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_8 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_2      */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_4      */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_8      */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Real_4     */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Real_8     */        {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , CG_LOGICAL_DEFAULT_TYPE }
			},
/* Long_Typeless */	{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Integer_1 */         {
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Short_Typeless_Const */        {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Typeless_1 */        {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Typeless_2 */        {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Typeless_4 */        {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Typeless_8 */        {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Long_Typeless */        {FALSE, Err_Res    },
        /* Integer_1      */    {FALSE, CG_LOGICAL_DEFAULT_TYPE },
        /* Integer_2      */    {FALSE, CG_LOGICAL_DEFAULT_TYPE },
        /* Integer_4      */    {FALSE, CG_LOGICAL_DEFAULT_TYPE },
        /* Integer_8      */    {FALSE, CG_LOGICAL_DEFAULT_TYPE },
        /* Real_4     */        {FALSE, CG_LOGICAL_DEFAULT_TYPE },
        /* Real_8     */        {FALSE, CG_LOGICAL_DEFAULT_TYPE },
        /* Real_16    */        {FALSE, CG_LOGICAL_DEFAULT_TYPE },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
        /* CRI_Ptr_8      */    {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */        {FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , CG_LOGICAL_DEFAULT_TYPE }
                        },
/* Integer_2 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Short_Typeless_Const */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Typeless_1 */        {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Typeless_2 */        {TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_4 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_8 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_2      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_4      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_8      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Real_4     */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Real_8     */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Real_16    */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , CG_LOGICAL_DEFAULT_TYPE }
			},
/* Integer_4 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Short_Typeless_Const */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Typeless_1 */        {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Typeless_2 */        {TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_4 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_8 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_2      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_4      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_8      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Real_4     */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Real_8     */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Real_16    */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , CG_LOGICAL_DEFAULT_TYPE }
			},
/* Integer_8 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Short_Typeless_Const */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_1 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_2 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_4 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_8 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_2      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_4      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_8      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Real_4     */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Real_8     */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Real_16    */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , CG_LOGICAL_DEFAULT_TYPE }
			},
/* Real_4 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Short_Typeless_Const */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_1 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_2 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_4 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_8 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_2      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_4      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_8      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Real_4     */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Real_8     */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Real_16    */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Real_8 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
        /* Short_Char_Const */        {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Short_Typeless_Const */        {TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_1 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_2 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_4 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Typeless_8 */        {TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_2      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_4      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_8      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Real_4     */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Real_8     */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Real_16    */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Real_16 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Short_Typeless_Const */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_2      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_4      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_8      */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Real_4     */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Real_8     */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Real_16    */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Complex_4 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Complex_8 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Complex_16 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* CRI_Ptr_8 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_1 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_2 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_4 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Typeless_8 */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_2      */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_4      */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Integer_8      */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , CG_LOGICAL_DEFAULT_TYPE }
			},
/* Logical_1 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Logical_2 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Logical_4 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Logical_8 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Character_1 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Character_2       */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Character_4       */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Character_2 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Character_2       */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Character_4       */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Character_4 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Short_Typeless_Const	 */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Character_2       */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* Character_4       */	{FALSE, CG_LOGICAL_DEFAULT_TYPE },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* CRI_Ch_Ptr_8 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{TRUE , CG_LOGICAL_DEFAULT_TYPE },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Structure_Type   */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* CRI_Parcel_Ptr_8   */          {
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {FALSE, Err_Res    },
        /* Short_Typeless_Const */    {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Typeless_1 */    {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Typeless_2 */    {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Typeless_4 */    {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Typeless_8 */    {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Long_Typeless */     {FALSE, Err_Res    },
        /* Integer_1      */    {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Integer_2      */    {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Integer_4      */    {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Integer_8      */    {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Real_4     */        {FALSE, Err_Res    },
        /* Real_8     */        {FALSE, Err_Res    },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
        /* CRI_Ptr_8      */    {TRUE , CG_LOGICAL_DEFAULT_TYPE },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */       {FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , CG_LOGICAL_DEFAULT_TYPE }
                        }
		};

# if defined(_TARGET_OS_MAX)
exp_tbl_type	and_or_tbl[Num_Linear_Types][Num_Linear_Types] = {
/* Err_Res */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Short_Char_Const */	{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Short_Typeless_Const },
	/* Short_Typeless_Const */	{TRUE , Short_Typeless_Const },
	/* Typeless_1 */	{TRUE , Typeless_1 },
	/* Typeless_2 */	{TRUE , Typeless_2 },
	/* Typeless_4 */	{TRUE , Typeless_4 },
	/* Typeless_8 */	{TRUE , Typeless_8 },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{TRUE , Typeless_4 },
	/* Integer_2      */	{TRUE , Typeless_4 },
	/* Integer_4      */	{TRUE , Typeless_4 },
	/* Integer_8      */	{TRUE , Typeless_8 },
	/* Real_4     */	{TRUE , Typeless_4 },
        /* Real_8     */        {TRUE , Typeless_8 },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , TYPELESS_DEFAULT_TYPE }
			},
/* Short_Typeless_Const */	{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Short_Typeless_Const },
	/* Short_Typeless_Const */	{TRUE , Short_Typeless_Const },
	/* Typeless_1 */	{TRUE , Typeless_1 },
	/* Typeless_2 */	{TRUE , Typeless_2 },
	/* Typeless_4 */	{TRUE , Typeless_4 },
	/* Typeless_8 */	{TRUE , Typeless_8 },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{TRUE , Typeless_4 },
	/* Integer_2      */	{TRUE , Typeless_4 },
	/* Integer_4      */	{TRUE , Typeless_4 },
	/* Integer_8      */	{TRUE , Typeless_8 },
	/* Real_4     */	{TRUE , Typeless_4 },
        /* Real_8     */        {TRUE , Typeless_8 },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , TYPELESS_DEFAULT_TYPE }
			},
/* Typeless_1 */        {
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {TRUE , Typeless_1 },
        /* Short_Typeless_Const */      {TRUE , Typeless_1 },
        /* Typeless_1 */        {TRUE , Typeless_1 },
        /* Typeless_2 */        {TRUE , Typeless_2 },
        /* Typeless_4 */        {TRUE , Typeless_4 },
        /* Typeless_8 */        {TRUE , Typeless_8 },
        /* Long_Typeless */     {FALSE, Err_Res    },
        /* Integer_1      */    {TRUE , Typeless_1 },
        /* Integer_2      */    {TRUE , Typeless_2 },
        /* Integer_4      */    {TRUE , Typeless_4 },
        /* Integer_8      */    {TRUE , Typeless_8 },
        /* Real_4     */        {TRUE , Typeless_4 },
        /* Real_8     */        {TRUE , Typeless_8 },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
        /* CRI_Ptr_8      */    {TRUE , TYPELESS_DEFAULT_TYPE },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */       {FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , TYPELESS_DEFAULT_TYPE }
                        },
/* Typeless_2 */        {
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {TRUE , Typeless_2 },
        /* Short_Typeless_Const */      {TRUE , Typeless_2 },
        /* Typeless_1 */        {TRUE , Typeless_2 },
        /* Typeless_2 */        {TRUE , Typeless_2 },
        /* Typeless_4 */        {TRUE , Typeless_4 },
        /* Typeless_8 */        {TRUE , Typeless_8 },
        /* Long_Typeless */     {FALSE, Err_Res    },
        /* Integer_1      */    {TRUE , Typeless_2 },
        /* Integer_2      */    {TRUE , Typeless_2 },
        /* Integer_4      */    {TRUE , Typeless_4 },
        /* Integer_8      */    {TRUE , Typeless_8 },
        /* Real_4     */        {TRUE , Typeless_4 },
        /* Real_8     */        {TRUE , Typeless_8 },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
        /* CRI_Ptr_8      */    {TRUE , TYPELESS_DEFAULT_TYPE },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */       {FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , TYPELESS_DEFAULT_TYPE }
                        },
/* Typeless_4 */	{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Typeless_4 },
	/* Short_Typeless_Const */	{TRUE , Typeless_4 },
	/* Typeless_1 */	{TRUE , Typeless_4 },
	/* Typeless_2 */	{TRUE , Typeless_4 },
	/* Typeless_4 */	{TRUE , Typeless_4 },
	/* Typeless_8 */	{TRUE , Typeless_8 },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{TRUE , Typeless_4 },
	/* Integer_2      */	{TRUE , Typeless_4 },
	/* Integer_4      */	{TRUE , Typeless_4 },
	/* Integer_8      */	{TRUE , Typeless_8 },
	/* Real_4     */	{TRUE , Typeless_4 },
        /* Real_8     */        {TRUE , Typeless_8 },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , TYPELESS_DEFAULT_TYPE }
			},
/* Typeless_8 */	{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Typeless_8 },
	/* Short_Typeless_Const */	{TRUE , Typeless_8 },
	/* Typeless_1 */	{TRUE , Typeless_8 },
	/* Typeless_2 */	{TRUE , Typeless_8 },
	/* Typeless_4 */	{TRUE , Typeless_8 },
	/* Typeless_8 */	{TRUE , Typeless_8 },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{TRUE , Typeless_4 },
	/* Integer_2      */	{TRUE , Typeless_4 },
	/* Integer_4      */	{TRUE , Typeless_4 },
	/* Integer_8      */	{TRUE , Typeless_8 },
	/* Real_4     */	{TRUE , Typeless_4 },
        /* Real_8     */        {TRUE , Typeless_8 },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , TYPELESS_DEFAULT_TYPE }
			},
/* Long_Typeless */	{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Integer_1 */         {
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {TRUE , Typeless_4 },
        /* Short_Typeless_Const */        {TRUE , Typeless_4 },
        /* Typeless_1 */        {TRUE , Typeless_1 },
        /* Typeless_2 */        {TRUE , Typeless_1 },
        /* Typeless_4 */        {TRUE , Typeless_1 },
        /* Typeless_8 */        {TRUE , Typeless_1 },
        /* Long_Typeless */        {FALSE, Err_Res    },
        /* Integer_1      */    {TRUE , Typeless_4 },
        /* Integer_2      */    {TRUE , Typeless_4 },
        /* Integer_4      */    {TRUE , Typeless_4 },
        /* Integer_8      */    {TRUE , Typeless_8 },
        /* Real_4     */        {TRUE , Typeless_4 },
        /* Real_8     */        {TRUE , Typeless_8 },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
        /* CRI_Ptr_8      */    {TRUE , TYPELESS_DEFAULT_TYPE },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */        {FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , TYPELESS_DEFAULT_TYPE }
                        },
/* Integer_2 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Typeless_4 },
	/* Short_Typeless_Const */	{TRUE , Typeless_4 },
        /* Typeless_1 */        {TRUE , Typeless_2 },
        /* Typeless_2 */        {TRUE , Typeless_2 },
	/* Typeless_4 */	{TRUE , Typeless_2 },
	/* Typeless_8 */	{TRUE , Typeless_2 },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{TRUE , Typeless_4 },
	/* Integer_2      */	{TRUE , Typeless_4 },
	/* Integer_4      */	{TRUE , Typeless_4 },
	/* Integer_8      */	{TRUE , Typeless_8 },
	/* Real_4     */	{TRUE , Typeless_4 },
	/* Real_8     */	{TRUE , Typeless_8 },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , TYPELESS_DEFAULT_TYPE }
			},
/* Integer_4 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Typeless_4 },
	/* Short_Typeless_Const */	{TRUE , Typeless_4 },
        /* Typeless_1 */        {TRUE , Typeless_4 },
        /* Typeless_2 */        {TRUE , Typeless_4 },
	/* Typeless_4 */	{TRUE , Typeless_4 },
	/* Typeless_8 */	{TRUE , Typeless_4 },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{TRUE , Typeless_4 },
	/* Integer_2      */	{TRUE , Typeless_4 },
	/* Integer_4      */	{TRUE , Typeless_4 },
	/* Integer_8      */	{TRUE , Typeless_8 },
	/* Real_4     */	{TRUE , Typeless_4 },
	/* Real_8     */	{TRUE , Typeless_8 },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , TYPELESS_DEFAULT_TYPE }
			},
/* Integer_8 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Typeless_8 },
	/* Short_Typeless_Const */	{TRUE , Typeless_8 },
        /* Typeless_1 */        {TRUE , Typeless_8 },
        /* Typeless_2 */        {TRUE , Typeless_8 },
	/* Typeless_4 */	{TRUE , Typeless_8 },
	/* Typeless_8 */	{TRUE , Typeless_8 },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{TRUE , Typeless_8 },
	/* Integer_2      */	{TRUE , Typeless_8 },
	/* Integer_4      */	{TRUE , Typeless_8 },
	/* Integer_8      */	{TRUE , Typeless_8 },
	/* Real_4     */	{TRUE , Typeless_8 },
	/* Real_8     */	{TRUE , Typeless_8 },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{TRUE , Typeless_8 },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , Typeless_8 },
			},
/* Real_4 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Typeless_4 },
	/* Short_Typeless_Const */	{TRUE , Typeless_4 },
	/* Typeless_1 */	{TRUE , Typeless_4 },
	/* Typeless_2 */	{TRUE , Typeless_4 },
	/* Typeless_4 */	{TRUE , Typeless_4 },
	/* Typeless_8 */	{TRUE , Typeless_4 },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{TRUE , Typeless_4 },
	/* Integer_2      */	{TRUE , Typeless_4 },
	/* Integer_4      */	{TRUE , Typeless_4 },
	/* Integer_8      */	{TRUE , Typeless_8 },
	/* Real_4     */	{TRUE , Typeless_4 },
	/* Real_8     */	{TRUE , Typeless_8 },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , TYPELESS_DEFAULT_TYPE }
			},
/* Real_8 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
        /* Short_Char_Const */  {TRUE , Typeless_8 },
        /* Short_Typeless_Const */    {TRUE , Typeless_8 },
        /* Typeless_1 */    {TRUE , Typeless_8 },
        /* Typeless_2 */    {TRUE , Typeless_8 },
        /* Typeless_4 */    {TRUE , Typeless_8 },
        /* Typeless_8 */    {TRUE , Typeless_8 },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{TRUE , Typeless_8 },
	/* Integer_2      */	{TRUE , Typeless_8 },
	/* Integer_4      */	{TRUE , Typeless_8 },
	/* Integer_8      */	{TRUE , Typeless_8 },
	/* Real_4     */	{TRUE , Typeless_8 },
	/* Real_8     */	{TRUE , Typeless_8 },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{TRUE , Typeless_8 },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , Typeless_8 },
			},
/* Real_16 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Complex_4 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Complex_8 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Complex_16 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* CRI_Ptr_8 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Short_Typeless_Const */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Typeless_1 */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Typeless_2 */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Typeless_4 */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Typeless_8 */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Integer_2      */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Integer_4      */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Integer_8      */	{TRUE , Typeless_8 },
	/* Real_4     */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Real_8     */	{TRUE , Typeless_8 },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , TYPELESS_DEFAULT_TYPE }
			},
/* Logical_1 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Logical_1  },
	/* Logical_2        */	{FALSE, Logical_2  },
	/* Logical_4        */	{FALSE, Logical_4  },
	/* Logical_8        */	{FALSE, Logical_8  },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Logical_2 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Logical_2  },
	/* Logical_2        */	{FALSE, Logical_2  },
	/* Logical_4        */	{FALSE, Logical_4  },
	/* Logical_8        */	{FALSE, Logical_8  },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Logical_4 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Logical_4  },
	/* Logical_2        */	{FALSE, Logical_4  },
	/* Logical_4        */	{FALSE, Logical_4  },
	/* Logical_8        */	{FALSE, Logical_8  },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Logical_8 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Logical_8        },
	/* Logical_2        */	{FALSE, Logical_8        },
	/* Logical_4        */	{FALSE, Logical_8        },
	/* Logical_8        */	{FALSE, Logical_8        },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Character_1 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Character_2 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Character_4 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* CRI_Ch_Ptr_8 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Structure_Type   */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* CRI_Parcel_Ptr_8   */          {
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {TRUE , TYPELESS_DEFAULT_TYPE },
        /* Short_Typeless_Const */    {TRUE , TYPELESS_DEFAULT_TYPE },
        /* Typeless_1 */    {TRUE , TYPELESS_DEFAULT_TYPE },
        /* Typeless_2 */    {TRUE , TYPELESS_DEFAULT_TYPE },
        /* Typeless_4 */    {TRUE , TYPELESS_DEFAULT_TYPE },
        /* Typeless_8 */    {TRUE , TYPELESS_DEFAULT_TYPE },
        /* Long_Typeless */     {FALSE, Err_Res    },
        /* Integer_1      */    {TRUE , TYPELESS_DEFAULT_TYPE },
        /* Integer_2      */    {TRUE , TYPELESS_DEFAULT_TYPE },
        /* Integer_4      */    {TRUE , TYPELESS_DEFAULT_TYPE },
        /* Integer_8      */    {TRUE , Typeless_8 },
        /* Real_4     */        {TRUE , TYPELESS_DEFAULT_TYPE },
        /* Real_8     */        {TRUE , Typeless_8 },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
        /* CRI_Ptr_8      */    {TRUE , TYPELESS_DEFAULT_TYPE },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */       {FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , TYPELESS_DEFAULT_TYPE }
                        }
		};
# else

exp_tbl_type	and_or_tbl[Num_Linear_Types][Num_Linear_Types] = {
/* Err_Res */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Short_Char_Const */	{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Short_Typeless_Const },
	/* Short_Typeless_Const */	{TRUE , Short_Typeless_Const },
	/* Typeless_1 */	{TRUE , Typeless_1 },
	/* Typeless_2 */	{TRUE , Typeless_2 },
	/* Typeless_4 */	{TRUE , Typeless_4 },
	/* Typeless_8 */	{TRUE , Typeless_8 },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Integer_2      */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Integer_4      */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Integer_8      */	{TRUE , Typeless_8 },
	/* Real_4     */	{TRUE , TYPELESS_DEFAULT_TYPE },
        /* Real_8     */        {TRUE , Typeless_8 },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , TYPELESS_DEFAULT_TYPE }
			},
/* Short_Typeless_Const */	{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Short_Typeless_Const },
	/* Short_Typeless_Const */	{TRUE , Short_Typeless_Const },
	/* Typeless_1 */	{TRUE , Typeless_1 },
	/* Typeless_2 */	{TRUE , Typeless_2 },
	/* Typeless_4 */	{TRUE , Typeless_4 },
	/* Typeless_8 */	{TRUE , Typeless_8 },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Integer_2      */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Integer_4      */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Integer_8      */	{TRUE , Typeless_8 },
	/* Real_4     */	{TRUE , TYPELESS_DEFAULT_TYPE },
        /* Real_8     */        {TRUE , Typeless_8 },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , TYPELESS_DEFAULT_TYPE }
			},
/* Typeless_1 */        {
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {TRUE , Typeless_1 },
        /* Short_Typeless_Const */      {TRUE , Typeless_1 },
        /* Typeless_1 */        {TRUE , Typeless_1 },
        /* Typeless_2 */        {TRUE , Typeless_2 },
        /* Typeless_4 */        {TRUE , Typeless_4 },
        /* Typeless_8 */        {TRUE , Typeless_8 },
        /* Long_Typeless */     {FALSE, Err_Res    },
        /* Integer_1      */    {TRUE , TYPELESS_DEFAULT_TYPE },
        /* Integer_2      */    {TRUE , TYPELESS_DEFAULT_TYPE },
        /* Integer_4      */    {TRUE , TYPELESS_DEFAULT_TYPE },
        /* Integer_8      */    {TRUE , Typeless_8 },
        /* Real_4     */        {TRUE , TYPELESS_DEFAULT_TYPE },
        /* Real_8     */        {TRUE , Typeless_8 },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
        /* CRI_Ptr_8      */    {TRUE , TYPELESS_DEFAULT_TYPE },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */       {FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , TYPELESS_DEFAULT_TYPE }
                        },
/* Typeless_2 */        {
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {TRUE , Typeless_2 },
        /* Short_Typeless_Const */      {TRUE , Typeless_4 },
        /* Typeless_1 */        {TRUE , Typeless_2 },
        /* Typeless_2 */        {TRUE , Typeless_2 },
        /* Typeless_4 */        {TRUE , Typeless_4 },
        /* Typeless_8 */        {TRUE , Typeless_8 },
        /* Long_Typeless */     {FALSE, Err_Res    },
        /* Integer_1      */    {TRUE , TYPELESS_DEFAULT_TYPE },
        /* Integer_2      */    {TRUE , TYPELESS_DEFAULT_TYPE },
        /* Integer_4      */    {TRUE , TYPELESS_DEFAULT_TYPE },
        /* Integer_8      */    {TRUE , Typeless_8 },
        /* Real_4     */        {TRUE , TYPELESS_DEFAULT_TYPE },
        /* Real_8     */        {TRUE , Typeless_8 },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
        /* CRI_Ptr_8      */    {TRUE , TYPELESS_DEFAULT_TYPE },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */       {FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , TYPELESS_DEFAULT_TYPE }
                        },
/* Typeless_4 */	{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Typeless_4 },
	/* Short_Typeless_Const */	{TRUE , Typeless_4 },
	/* Typeless_1 */	{TRUE , Typeless_4 },
	/* Typeless_2 */	{TRUE , Typeless_4 },
	/* Typeless_4 */	{TRUE , Typeless_4 },
	/* Typeless_8 */	{TRUE , Typeless_8 },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Integer_2      */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Integer_4      */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Integer_8      */	{TRUE , Typeless_8 },
	/* Real_4     */	{TRUE , TYPELESS_DEFAULT_TYPE },
        /* Real_8     */        {TRUE , Typeless_8 },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , TYPELESS_DEFAULT_TYPE }
			},
/* Typeless_8 */	{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Typeless_8 },
	/* Short_Typeless_Const */	{TRUE , Typeless_8 },
	/* Typeless_1 */	{TRUE , Typeless_8 },
	/* Typeless_2 */	{TRUE , Typeless_8 },
	/* Typeless_4 */	{TRUE , Typeless_8 },
	/* Typeless_8 */	{TRUE , Typeless_8 },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Integer_2      */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Integer_4      */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Integer_8      */	{TRUE , Typeless_8 },
	/* Real_4     */	{TRUE , TYPELESS_DEFAULT_TYPE },
        /* Real_8     */        {TRUE , Typeless_8 },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , TYPELESS_DEFAULT_TYPE }
			},
/* Long_Typeless */	{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Integer_1 */         {
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {TRUE , TYPELESS_DEFAULT_TYPE },
        /* Short_Typeless_Const */        {TRUE , TYPELESS_DEFAULT_TYPE },
        /* Typeless_1 */        {TRUE , TYPELESS_DEFAULT_TYPE },
        /* Typeless_2 */        {TRUE , TYPELESS_DEFAULT_TYPE },
        /* Typeless_4 */        {TRUE , TYPELESS_DEFAULT_TYPE },
        /* Typeless_8 */        {TRUE , TYPELESS_DEFAULT_TYPE },
        /* Long_Typeless */        {FALSE, Err_Res    },
        /* Integer_1      */    {TRUE , TYPELESS_DEFAULT_TYPE },
        /* Integer_2      */    {TRUE , TYPELESS_DEFAULT_TYPE },
        /* Integer_4      */    {TRUE , TYPELESS_DEFAULT_TYPE },
        /* Integer_8      */    {TRUE , Typeless_8 },
        /* Real_4     */        {TRUE , TYPELESS_DEFAULT_TYPE },
        /* Real_8     */        {TRUE , Typeless_8 },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
        /* CRI_Ptr_8      */    {TRUE , TYPELESS_DEFAULT_TYPE },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */        {FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , TYPELESS_DEFAULT_TYPE }
                        },
/* Integer_2 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Short_Typeless_Const */	{TRUE , TYPELESS_DEFAULT_TYPE },
        /* Typeless_1 */        {TRUE , TYPELESS_DEFAULT_TYPE },
        /* Typeless_2 */        {TRUE , TYPELESS_DEFAULT_TYPE },
	/* Typeless_4 */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Typeless_8 */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Integer_2      */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Integer_4      */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Integer_8      */	{TRUE , Typeless_8 },
	/* Real_4     */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Real_8     */	{TRUE , Typeless_8 },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , TYPELESS_DEFAULT_TYPE }
			},
/* Integer_4 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Short_Typeless_Const */	{TRUE , TYPELESS_DEFAULT_TYPE },
        /* Typeless_1 */        {TRUE , TYPELESS_DEFAULT_TYPE },
        /* Typeless_2 */        {TRUE , TYPELESS_DEFAULT_TYPE },
	/* Typeless_4 */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Typeless_8 */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Integer_2      */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Integer_4      */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Integer_8      */	{TRUE , Typeless_8 },
	/* Real_4     */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Real_8     */	{TRUE , Typeless_8 },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , TYPELESS_DEFAULT_TYPE }
			},
/* Integer_8 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Typeless_8 },
	/* Short_Typeless_Const */	{TRUE , Typeless_8 },
	/* Typeless_1 */	{TRUE , Typeless_8 },
	/* Typeless_2 */	{TRUE , Typeless_8 },
	/* Typeless_4 */	{TRUE , Typeless_8 },
	/* Typeless_8 */	{TRUE , Typeless_8 },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{TRUE , Typeless_8 },
	/* Integer_2      */	{TRUE , Typeless_8 },
	/* Integer_4      */	{TRUE , Typeless_8 },
	/* Integer_8      */	{TRUE , Typeless_8 },
	/* Real_4     */	{TRUE , Typeless_8 },
	/* Real_8     */	{TRUE , Typeless_8 },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{TRUE , Typeless_8 },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , Typeless_8 },
			},
/* Real_4 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Short_Typeless_Const */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Typeless_1 */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Typeless_2 */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Typeless_4 */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Typeless_8 */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Integer_2      */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Integer_4      */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Integer_8      */	{TRUE , Typeless_8 },
	/* Real_4     */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Real_8     */	{TRUE , Typeless_8 },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , TYPELESS_DEFAULT_TYPE }
			},
/* Real_8 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
        /* Short_Char_Const */  {TRUE , Typeless_8 },
        /* Short_Typeless_Const */    {TRUE , Typeless_8 },
        /* Typeless_1 */    {TRUE , Typeless_8 },
        /* Typeless_2 */    {TRUE , Typeless_8 },
        /* Typeless_4 */    {TRUE , Typeless_8 },
        /* Typeless_8 */    {TRUE , Typeless_8 },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{TRUE , Typeless_8 },
	/* Integer_2      */	{TRUE , Typeless_8 },
	/* Integer_4      */	{TRUE , Typeless_8 },
	/* Integer_8      */	{TRUE , Typeless_8 },
	/* Real_4     */	{TRUE , Typeless_8 },
	/* Real_8     */	{TRUE , Typeless_8 },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{TRUE , Typeless_8 },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , Typeless_8 },
			},
/* Real_16 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Complex_4 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Complex_8 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Complex_16 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* CRI_Ptr_8 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Short_Typeless_Const */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Typeless_1 */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Typeless_2 */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Typeless_4 */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Typeless_8 */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Integer_2      */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Integer_4      */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Integer_8      */	{TRUE , Typeless_8 },
	/* Real_4     */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Real_8     */	{TRUE , Typeless_8 },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , TYPELESS_DEFAULT_TYPE }
			},
/* Logical_1 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Logical_1  },
	/* Logical_2        */	{FALSE, Logical_2  },
	/* Logical_4        */	{FALSE, Logical_4  },
	/* Logical_8        */	{FALSE, Logical_8  },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Logical_2 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Logical_2  },
	/* Logical_2        */	{FALSE, Logical_2  },
	/* Logical_4        */	{FALSE, Logical_4  },
	/* Logical_8        */	{FALSE, Logical_8  },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Logical_4 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Logical_4  },
	/* Logical_2        */	{FALSE, Logical_4  },
	/* Logical_4        */	{FALSE, Logical_4  },
	/* Logical_8        */	{FALSE, Logical_8  },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Logical_8 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Logical_8        },
	/* Logical_2        */	{FALSE, Logical_8        },
	/* Logical_4        */	{FALSE, Logical_8        },
	/* Logical_8        */	{FALSE, Logical_8        },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Character_1 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Character_2 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Character_4 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* CRI_Ch_Ptr_8 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Structure_Type   */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* CRI_Parcel_Ptr_8   */          {
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {TRUE , TYPELESS_DEFAULT_TYPE },
        /* Short_Typeless_Const */    {TRUE , TYPELESS_DEFAULT_TYPE },
        /* Typeless_1 */    {TRUE , TYPELESS_DEFAULT_TYPE },
        /* Typeless_2 */    {TRUE , TYPELESS_DEFAULT_TYPE },
        /* Typeless_4 */    {TRUE , TYPELESS_DEFAULT_TYPE },
        /* Typeless_8 */    {TRUE , TYPELESS_DEFAULT_TYPE },
        /* Long_Typeless */     {FALSE, Err_Res    },
        /* Integer_1      */    {TRUE , TYPELESS_DEFAULT_TYPE },
        /* Integer_2      */    {TRUE , TYPELESS_DEFAULT_TYPE },
        /* Integer_4      */    {TRUE , TYPELESS_DEFAULT_TYPE },
        /* Integer_8      */    {TRUE , Typeless_8 },
        /* Real_4     */        {TRUE , TYPELESS_DEFAULT_TYPE },
        /* Real_8     */        {TRUE , Typeless_8 },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
        /* CRI_Ptr_8      */    {TRUE , TYPELESS_DEFAULT_TYPE },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */       {FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , TYPELESS_DEFAULT_TYPE }
                        }
		};
# endif


exp_tbl_type	asg_tbl[Num_Linear_Types][Num_Linear_Types] = {
/* Err_Res */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Short_Char_Const */	{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Short_Typeless_Const */	{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Typeless_1 */        {
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {FALSE, Err_Res    },
        /* Short_Typeless_Const */      {FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
        /* Long_Typeless */     {FALSE, Err_Res    },
        /* Integer_1      */    {FALSE, Err_Res    },
        /* Integer_2      */    {FALSE, Err_Res    },
        /* Integer_4      */    {FALSE, Err_Res    },
        /* Integer_8      */    {FALSE, Err_Res    },
        /* Real_4     */        {FALSE, Err_Res    },
        /* Real_8     */        {FALSE, Err_Res    },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
        /* CRI_Ptr_8      */    {FALSE, Err_Res    },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */       {FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
                        },
/* Typeless_2 */        {
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {FALSE, Err_Res    },
        /* Short_Typeless_Const */      {FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
        /* Long_Typeless */     {FALSE, Err_Res    },
        /* Integer_1      */    {FALSE, Err_Res    },
        /* Integer_2      */    {FALSE, Err_Res    },
        /* Integer_4      */    {FALSE, Err_Res    },
        /* Integer_8      */    {FALSE, Err_Res    },
        /* Real_4     */        {FALSE, Err_Res    },
        /* Real_8     */        {FALSE, Err_Res    },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
        /* CRI_Ptr_8      */    {FALSE, Err_Res    },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */       {FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
                        },
/* Typeless_4 */	{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Typeless_8 */	{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Long_Typeless */	{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Integer_1 */         {
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {TRUE , Integer_1      },
        /* Short_Typeless_Const */    {TRUE , Integer_1      },
        /* Typeless_1 */    {TRUE , Integer_1      },
        /* Typeless_2 */    {TRUE , Integer_1      },
        /* Typeless_4 */    {TRUE , Integer_1      },
        /* Typeless_8 */    {TRUE , Integer_1      },
        /* Long_Typeless */     {FALSE, Err_Res    },
        /* Integer_1      */    {FALSE, Integer_1      },
        /* Integer_2      */    {FALSE, Integer_1      },
        /* Integer_4      */    {FALSE, Integer_1      },
        /* Integer_8      */    {FALSE, Integer_1      },
        /* Real_4     */        {FALSE, Integer_1      },
        /* Real_8     */        {FALSE, Integer_1      },
        /* Real_16    */        {FALSE, Integer_1      },
        /* Complex_4     */     {FALSE, Integer_1      },
        /* Complex_8     */     {FALSE, Integer_1      },
        /* Complex_16    */     {FALSE, Integer_1      },
        /* CRI_Ptr_8      */    {TRUE , Integer_1      },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */        {FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , Integer_1  }
                        },
/* Integer_2 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Integer_2      },
	/* Short_Typeless_Const */	{TRUE , Integer_2      },
	/* Typeless_1 */	{TRUE , Integer_2      },
	/* Typeless_2 */	{TRUE , Integer_2      },
	/* Typeless_4 */	{TRUE , Integer_2      },
	/* Typeless_8 */	{TRUE , Integer_2      },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Integer_2      },
	/* Integer_2      */	{FALSE, Integer_2      },
	/* Integer_4      */	{FALSE, Integer_2      },
	/* Integer_8      */	{FALSE, Integer_2      },
	/* Real_4     */	{FALSE, Integer_2      },
	/* Real_8     */	{FALSE, Integer_2      },
	/* Real_16    */	{FALSE, Integer_2      },
	/* Complex_4     */	{FALSE, Integer_2      },
	/* Complex_8     */	{FALSE, Integer_2      },
	/* Complex_16    */	{FALSE, Integer_2      },
	/* CRI_Ptr_8      */	{TRUE , Integer_2      },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , Integer_2  }
			},
/* Integer_4 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Integer_4      },
	/* Short_Typeless_Const */	{TRUE , Integer_4      },
	/* Typeless_1 */	{TRUE , Integer_4      },
	/* Typeless_2 */	{TRUE , Integer_4      },
	/* Typeless_4 */	{TRUE , Integer_4      },
	/* Typeless_8 */	{TRUE , Integer_4      },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Integer_4      },
	/* Integer_2      */	{FALSE, Integer_4      },
	/* Integer_4      */	{FALSE, Integer_4      },
	/* Integer_8      */	{FALSE, Integer_4      },
	/* Real_4     */	{FALSE, Integer_4      },
	/* Real_8     */	{FALSE, Integer_4      },
	/* Real_16    */	{FALSE, Integer_4      },
	/* Complex_4     */	{FALSE, Integer_4      },
	/* Complex_8     */	{FALSE, Integer_4      },
	/* Complex_16    */	{FALSE, Integer_4      },
	/* CRI_Ptr_8      */	{TRUE , Integer_4      },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , Integer_4  }
			},
/* Integer_8 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Integer_8      },
	/* Short_Typeless_Const */	{TRUE , Integer_8      },
	/* Typeless_1 */	{TRUE , Integer_8      },
	/* Typeless_2 */	{TRUE , Integer_8      },
	/* Typeless_4 */	{TRUE , Integer_8      },
	/* Typeless_8 */	{TRUE , Integer_8      },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Integer_8      },
	/* Integer_2      */	{FALSE, Integer_8      },
	/* Integer_4      */	{FALSE, Integer_8      },
	/* Integer_8      */	{FALSE, Integer_8      },
	/* Real_4     */	{FALSE, Integer_8      },
	/* Real_8     */	{FALSE, Integer_8      },
	/* Real_16    */	{FALSE, Integer_8      },
	/* Complex_4     */	{FALSE, Integer_8      },
	/* Complex_8     */	{FALSE, Integer_8      },
	/* Complex_16    */	{FALSE, Integer_8      },
	/* CRI_Ptr_8      */	{TRUE , Integer_8      },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , Integer_8  }
			},
/* Real_4 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Real_4     },
	/* Short_Typeless_Const */	{TRUE , Real_4     },
        /* Typeless_1 */        {FALSE, Err_Res    },
        /* Typeless_2 */        {FALSE, Err_Res    },
	/* Typeless_4 */	{TRUE , Real_4     },
	/* Typeless_8 */	{TRUE , Real_4     },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Real_4     },
	/* Integer_2      */	{FALSE, Real_4     },
	/* Integer_4      */	{FALSE, Real_4     },
	/* Integer_8      */	{FALSE, Real_4     },
	/* Real_4     */	{FALSE, Real_4     },
	/* Real_8     */	{FALSE, Real_4     },
	/* Real_16    */	{FALSE, Real_4     },
	/* Complex_4     */	{FALSE, Real_4     },
	/* Complex_8     */	{FALSE, Real_4     },
	/* Complex_16    */	{FALSE, Real_4     },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Real_8 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
        /* Short_Char_Const */        {TRUE , Real_8     },
        /* Short_Typeless_Const */        {TRUE , Real_8     },
        /* Typeless_1 */        {FALSE, Err_Res    },
        /* Typeless_2 */        {FALSE, Err_Res    },
        /* Typeless_4 */        {FALSE, Err_Res    },
        /* Typeless_8 */        {TRUE , Real_8     },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Real_8     },
	/* Integer_2      */	{FALSE, Real_8     },
	/* Integer_4      */	{FALSE, Real_8     },
	/* Integer_8      */	{FALSE, Real_8     },
	/* Real_4     */	{FALSE, Real_8     },
	/* Real_8     */	{FALSE, Real_8     },
	/* Real_16    */	{FALSE, Real_8     },
	/* Complex_4     */	{FALSE, Real_8     },
	/* Complex_8     */	{FALSE, Real_8     },
	/* Complex_16    */	{FALSE, Real_8     },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Real_16 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Real_16    },
	/* Short_Typeless_Const */	{TRUE , Real_16    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Real_16    },
	/* Integer_2      */	{FALSE, Real_16    },
	/* Integer_4      */	{FALSE, Real_16    },
	/* Integer_8      */	{FALSE, Real_16    },
	/* Real_4     */	{FALSE, Real_16    },
	/* Real_8     */	{FALSE, Real_16    },
	/* Real_16    */	{FALSE, Real_16    },
	/* Complex_4     */	{FALSE, Real_16    },
	/* Complex_8     */	{FALSE, Real_16    },
	/* Complex_16    */	{FALSE, Real_16    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Complex_4 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Complex_4  },
	/* Short_Typeless_Const */	{TRUE , Complex_4  },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Complex_4     },
	/* Integer_2      */	{FALSE, Complex_4     },
	/* Integer_4      */	{FALSE, Complex_4     },
	/* Integer_8      */	{FALSE, Complex_4     },
	/* Real_4     */	{FALSE, Complex_4     },
	/* Real_8     */	{FALSE, Complex_4     },
	/* Real_16    */	{FALSE, Complex_4     },
	/* Complex_4     */	{FALSE, Complex_4     },
	/* Complex_8     */	{FALSE, Complex_4     },
	/* Complex_16    */	{FALSE, Complex_4     },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Complex_8 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Complex_8  },
	/* Short_Typeless_Const */	{TRUE , Complex_8  },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Complex_8     },
	/* Integer_2      */	{FALSE, Complex_8     },
	/* Integer_4      */	{FALSE, Complex_8     },
	/* Integer_8      */	{FALSE, Complex_8     },
	/* Real_4     */	{FALSE, Complex_8     },
	/* Real_8     */	{FALSE, Complex_8     },
	/* Real_16    */	{FALSE, Complex_8     },
	/* Complex_4     */	{FALSE, Complex_8     },
	/* Complex_8     */	{FALSE, Complex_8     },
	/* Complex_16    */	{FALSE, Complex_8     },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Complex_16 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Complex_16 },
	/* Short_Typeless_Const */	{TRUE , Complex_16 },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Complex_16    },
	/* Integer_2      */	{FALSE, Complex_16    },
	/* Integer_4      */	{FALSE, Complex_16    },
	/* Integer_8      */	{FALSE, Complex_16    },
	/* Real_4     */	{FALSE, Complex_16    },
	/* Real_8     */	{FALSE, Complex_16    },
	/* Real_16    */	{FALSE, Complex_16    },
	/* Complex_4     */	{FALSE, Complex_16    },
	/* Complex_8     */	{FALSE, Complex_16    },
	/* Complex_16    */	{FALSE, Complex_16    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* CRI_Ptr_8 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{TRUE , CRI_Ptr_8      },
	/* Typeless_1 */	{TRUE , CRI_Ptr_8      },
	/* Typeless_2 */	{TRUE , CRI_Ptr_8      },
	/* Typeless_4 */	{TRUE , CRI_Ptr_8      },
	/* Typeless_8 */	{TRUE , CRI_Ptr_8      },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{TRUE , CRI_Ptr_8      },
	/* Integer_2      */	{TRUE , CRI_Ptr_8      },
	/* Integer_4      */	{TRUE , CRI_Ptr_8      },
	/* Integer_8      */	{TRUE , CRI_Ptr_8      },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{TRUE , CRI_Ptr_8      },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , CRI_Ptr_8  }
			},
/* Logical_1 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Logical_1        },
	/* Logical_2        */	{FALSE, Logical_1        },
	/* Logical_4        */	{FALSE, Logical_1        },
	/* Logical_8        */	{FALSE, Logical_1        },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Logical_2 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Logical_2        },
	/* Logical_2        */	{FALSE, Logical_2        },
	/* Logical_4        */	{FALSE, Logical_2        },
	/* Logical_8        */	{FALSE, Logical_2        },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Logical_4 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Logical_4        },
	/* Logical_2        */	{FALSE, Logical_4        },
	/* Logical_4        */	{FALSE, Logical_4        },
	/* Logical_8        */	{FALSE, Logical_4        },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Logical_8 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Logical_8        },
	/* Logical_2        */	{FALSE, Logical_8        },
	/* Logical_4        */	{FALSE, Logical_8        },
	/* Logical_8        */	{FALSE, Logical_8        },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Character_1 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Character_1    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Character_1       },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Character_2 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Character_2    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Character_2       },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* Character_4 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Character_4    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Character_4       },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
# if defined(_EXTENDED_CRI_CHAR_POINTER)
/* CRI_Ch_Ptr_8 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{TRUE,  CRI_Ch_Ptr_8 },
	/* Integer_2      */	{TRUE,  CRI_Ch_Ptr_8 },
	/* Integer_4      */	{TRUE,  CRI_Ch_Ptr_8 },
	/* Integer_8      */	{TRUE,  CRI_Ch_Ptr_8 },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{TRUE,  CRI_Ch_Ptr_8 },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{TRUE , CRI_Ch_Ptr_8    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
# else
/* CRI_Ch_Ptr_8 */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{TRUE , CRI_Ch_Ptr_8    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
# endif
/* Structure_Type   */		{
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{FALSE, Err_Res    },
	/* Short_Typeless_Const */	{FALSE, Err_Res    },
        /* Typeless_1 */  {FALSE, Err_Res    },
        /* Typeless_2 */  {FALSE, Err_Res    },
        /* Typeless_4 */  {FALSE, Err_Res    },
        /* Typeless_8 */  {FALSE, Err_Res    },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Err_Res    },
	/* Integer_2      */	{FALSE, Err_Res    },
	/* Integer_4      */	{FALSE, Err_Res    },
	/* Integer_8      */	{FALSE, Err_Res    },
	/* Real_4     */	{FALSE, Err_Res    },
	/* Real_8     */	{FALSE, Err_Res    },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Structure_Type      },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
			},
/* CRI_Parcel_Ptr_8   */          {
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {FALSE, Err_Res    },
        /* Short_Typeless_Const */    {TRUE , CRI_Parcel_Ptr_8      },
        /* Typeless_1 */    {TRUE , CRI_Parcel_Ptr_8      },
        /* Typeless_2 */    {TRUE , CRI_Parcel_Ptr_8      },
        /* Typeless_4 */    {TRUE , CRI_Parcel_Ptr_8      },
        /* Typeless_8 */    {TRUE , CRI_Parcel_Ptr_8      },
        /* Long_Typeless */     {FALSE, Err_Res    },
        /* Integer_1      */    {TRUE , CRI_Parcel_Ptr_8      },
        /* Integer_2      */    {TRUE , CRI_Parcel_Ptr_8      },
        /* Integer_4      */    {TRUE , CRI_Parcel_Ptr_8      },
        /* Integer_8      */    {TRUE , CRI_Parcel_Ptr_8      },
        /* Real_4     */        {FALSE, Err_Res    },
        /* Real_8     */        {FALSE, Err_Res    },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
        /* CRI_Ptr_8      */    {TRUE , CRI_Parcel_Ptr_8      },
        /* Logical_1        */  {FALSE, Err_Res    },
        /* Logical_2        */  {FALSE, Err_Res    },
        /* Logical_4        */  {FALSE, Err_Res    },
        /* Logical_8        */  {FALSE, Err_Res    },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */       {FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , CRI_Parcel_Ptr_8  }
                        }
		};



exp_tbl_type	un_plus_tbl[Num_Linear_Types] = {
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Short_Typeless_Const },
	/* Short_Typeless_Const */	{TRUE , Short_Typeless_Const },
	/* Typeless_1 */	{TRUE , Typeless_1 },
	/* Typeless_2 */	{TRUE , Typeless_2 },
	/* Typeless_4 */	{TRUE , Typeless_4 },
	/* Typeless_8 */	{TRUE , Typeless_8 },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{FALSE, Integer_1      },
	/* Integer_2      */	{FALSE, Integer_2      },
	/* Integer_4      */	{FALSE, Integer_4      },
	/* Integer_8      */	{FALSE, Integer_8      },
	/* Real_4     */	{FALSE, Real_4     },
	/* Real_8     */	{FALSE, Real_8     },
	/* Real_16    */	{FALSE, Real_16    },
	/* Complex_4     */	{FALSE, Complex_4     },
	/* Complex_8     */	{FALSE, Complex_8     },
	/* Complex_16    */	{FALSE, Complex_16    },
	/* CRI_Ptr_8      */	{FALSE, Err_Res    },
	/* Logical_1        */	{FALSE, Err_Res    },
	/* Logical_2        */	{FALSE, Err_Res    },
	/* Logical_4        */	{FALSE, Err_Res    },
	/* Logical_8        */	{FALSE, Err_Res    },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {FALSE, Err_Res    }
		};


# if defined(_TARGET_OS_MAX)
exp_tbl_type    not_tbl[Num_Linear_Types] = {
        /* Err_Res    */        {FALSE, Err_Res    },
        /* Short_Char_Const */  {TRUE , Short_Typeless_Const },
        /* Short_Typeless_Const */      {TRUE , Short_Typeless_Const },
        /* Typeless_1 */  {TRUE , Typeless_1 },
        /* Typeless_2 */  {TRUE , Typeless_2 },
        /* Typeless_4 */  {TRUE , Typeless_4 },
        /* Typeless_8 */  {TRUE , Typeless_8 },
        /* Long_Typeless */     {FALSE, Err_Res    },
        /* Integer_1      */    {TRUE , Typeless_4 },
        /* Integer_2      */    {TRUE , Typeless_4 },
        /* Integer_4      */    {TRUE , Typeless_4 },
        /* Integer_8      */    {TRUE , Typeless_8 },
        /* Real_4     */        {TRUE , Typeless_4 },
        /* Real_8     */        {TRUE , Typeless_8 },
        /* Real_16    */        {FALSE, Err_Res    },
        /* Complex_4     */     {FALSE, Err_Res    },
        /* Complex_8     */     {FALSE, Err_Res    },
        /* Complex_16    */     {FALSE, Err_Res    },
        /* CRI_Ptr_8      */    {TRUE , TYPELESS_DEFAULT_TYPE },
        /* Logical_1        */  {FALSE, Logical_1        },
        /* Logical_2        */  {FALSE, Logical_2        },
        /* Logical_4        */  {FALSE, Logical_4        },
        /* Logical_8        */  {FALSE, Logical_8        },
        /* Character_1       */ {FALSE, Err_Res    },
        /* Character_2       */ {FALSE, Err_Res    },
        /* Character_4       */ {FALSE, Err_Res    },
        /* CRI_Ch_Ptr_8    */   {FALSE, Err_Res    },
        /* Structure_Type      */       {FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , TYPELESS_DEFAULT_TYPE }
                };

#else

exp_tbl_type	not_tbl[Num_Linear_Types] = {
	/* Err_Res    */	{FALSE, Err_Res    },
	/* Short_Char_Const */	{TRUE , Short_Typeless_Const },
	/* Short_Typeless_Const */	{TRUE , Short_Typeless_Const },
        /* Typeless_1 */  	{TRUE , Typeless_1 },
        /* Typeless_2 */  	{TRUE , Typeless_2 },
	/* Typeless_4 */	{TRUE , Typeless_4 },
	/* Typeless_8 */	{TRUE , Typeless_8 },
	/* Long_Typeless */	{FALSE, Err_Res    },
	/* Integer_1      */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Integer_2      */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Integer_4      */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Integer_8      */	{TRUE , Typeless_8 },
	/* Real_4     */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Real_8     */	{TRUE , Typeless_8 },
	/* Real_16    */	{FALSE, Err_Res    },
	/* Complex_4     */	{FALSE, Err_Res    },
	/* Complex_8     */	{FALSE, Err_Res    },
	/* Complex_16    */	{FALSE, Err_Res    },
	/* CRI_Ptr_8      */	{TRUE , TYPELESS_DEFAULT_TYPE },
	/* Logical_1        */	{FALSE, Logical_1        },
	/* Logical_2        */	{FALSE, Logical_2        },
	/* Logical_4        */	{FALSE, Logical_4        },
	/* Logical_8        */	{FALSE, Logical_8        },
	/* Character_1       */	{FALSE, Err_Res    },
	/* Character_2       */	{FALSE, Err_Res    },
	/* Character_4       */	{FALSE, Err_Res    },
	/* CRI_Ch_Ptr_8    */	{FALSE, Err_Res    },
	/* Structure_Type      */	{FALSE, Err_Res    },
        /* CRI_Parcel_Ptr_8  */   {TRUE , TYPELESS_DEFAULT_TYPE }
		};
# endif



/******************************************************************************\
|*      data available to s_asg_expr.c and s_utils.c                          *|
\******************************************************************************/

boolean		pgm_unit_illegal     	= TRUE;
boolean		namelist_illegal     	= TRUE;
boolean		in_component_ref     	= FALSE;
int		constructor_level 	= 0;
boolean		tree_has_ranf		= FALSE;
boolean		no_sub_or_deref		= FALSE;
boolean		processing_do_var 	= FALSE;
